diff options
Diffstat (limited to 'src/Windows/Registry.hs')
-rw-r--r-- | src/Windows/Registry.hs | 7 |
1 files changed, 3 insertions, 4 deletions
diff --git a/src/Windows/Registry.hs b/src/Windows/Registry.hs index 5203fb8..41275bf 100644 --- a/src/Windows/Registry.hs +++ b/src/Windows/Registry.hs @@ -35,21 +35,20 @@ module Windows.Registry , setStringPreserveType ) where +import Control.Exception (bracket) +import Control.Monad.Trans.Except (ExceptT(..), catchE, throwE) import Data.Bits ((.|.)) import qualified Data.ByteString as B import Data.List (intercalate) import Data.Maybe (fromJust) -import Data.Tuple (swap) import qualified Data.Text as T import Data.Text.Encoding (decodeUtf16LE, encodeUtf16LE) -import Control.Exception (bracket) -import Control.Monad.Trans.Except (ExceptT(..), catchE, throwE) +import Data.Tuple (swap) import Foreign.ForeignPtr (withForeignPtr) import Foreign.Marshal.Alloc (alloca, allocaBytes) import Foreign.Marshal.Array (peekArray, pokeArray) import Foreign.Storable (peek, poke) import System.IO.Error (catchIOError, isDoesNotExistError) - import qualified System.Win32.Types as WinAPI import qualified System.Win32.Registry as WinAPI |