diff options
| author | David Terei <davidterei@gmail.com> | 2011-06-07 23:58:41 -0700 |
|---|---|---|
| committer | David Terei <davidterei@gmail.com> | 2011-06-17 20:40:34 -0700 |
| commit | 35f53b0e94392933be5f29a50d1887cfbe5fc248 (patch) | |
| tree | 10b17d4c49f825efe49cd2c75bad961b33f83040 /compiler/utils/FastString.lhs | |
| parent | b8281d80a18c2d9b9a3c68d523c4d7abd9fd9fa7 (diff) | |
| download | haskell-35f53b0e94392933be5f29a50d1887cfbe5fc248.tar.gz | |
SafeHaskell: Fix imports of base when base unsafe
Diffstat (limited to 'compiler/utils/FastString.lhs')
| -rw-r--r-- | compiler/utils/FastString.lhs | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/compiler/utils/FastString.lhs b/compiler/utils/FastString.lhs index 89ab75815c..b1449edae2 100644 --- a/compiler/utils/FastString.lhs +++ b/compiler/utils/FastString.lhs @@ -96,7 +96,6 @@ import FastFunctions import Panic import Util -import Foreign import Foreign.C import GHC.Exts import System.IO @@ -109,8 +108,10 @@ import Data.Char ( ord ) import GhcIO ( IO(..) ) #if __GLASGOW_HASKELL__ >= 701 +import Foreign.Safe import GHC.Ptr.Unsafe ( Ptr(..) ) #else +import Foreign hiding ( unsafePerformIO ) import GHC.Ptr ( Ptr(..) ) #endif |