diff options
| author | krasimir <unknown> | 2005-01-22 08:20:31 +0000 |
|---|---|---|
| committer | krasimir <unknown> | 2005-01-22 08:20:31 +0000 |
| commit | 585d87f1d621a386e4cfdd14f8a3ac1eed2413d4 (patch) | |
| tree | 7f86b0e3cd6da0a3e604ad8f8cd3a1e0eb68ea56 /ghc/lib | |
| parent | c7fd6356eb1ccab4b92fa548d52023cc221fa7c0 (diff) | |
| download | haskell-585d87f1d621a386e4cfdd14f8a3ac1eed2413d4.tar.gz | |
[project @ 2005-01-22 08:20:31 by krasimir]
import Foreign.Ptr and Foreign.C under Windows
Diffstat (limited to 'ghc/lib')
| -rw-r--r-- | ghc/lib/compat/Compat/Directory.hs | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/ghc/lib/compat/Compat/Directory.hs b/ghc/lib/compat/Compat/Directory.hs index 7f6306cafb..6a9f4dc1be 100644 --- a/ghc/lib/compat/Compat/Directory.hs +++ b/ghc/lib/compat/Compat/Directory.hs @@ -37,6 +37,10 @@ import GHC.IOBase ( IOException(..) ) #else import System.IO ( try ) #endif +#if __GLASGOW_HASKELL__ && defined(mingw32_TARGET_OS) +import Foreign.Ptr +import Foreign.C +#endif import System.Directory(doesFileExist, doesDirectoryExist, getPermissions, setPermissions, createDirectory) getAppUserDataDirectory :: String -> IO FilePath |