diff options
author | David Terei <davidterei@gmail.com> | 2011-06-14 14:04:11 -0700 |
---|---|---|
committer | David Terei <davidterei@gmail.com> | 2011-06-17 20:40:34 -0700 |
commit | 1d704e17caef8156a3d4c4b764737ede85884eb8 (patch) | |
tree | fdc5c2b7023d16b4aa111739c314be37c5de8e45 /compiler/utils/FastString.lhs | |
parent | 90bab6b82256b5dc0562e46a091b4dcfce18f804 (diff) | |
download | haskell-1d704e17caef8156a3d4c4b764737ede85884eb8.tar.gz |
SafeHaskell: Make base GHC.* modules untrusted
Diffstat (limited to 'compiler/utils/FastString.lhs')
-rw-r--r-- | compiler/utils/FastString.lhs | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/compiler/utils/FastString.lhs b/compiler/utils/FastString.lhs index b1449edae2..35d4387dd3 100644 --- a/compiler/utils/FastString.lhs +++ b/compiler/utils/FastString.lhs @@ -105,14 +105,13 @@ import Data.IORef ( IORef, newIORef, readIORef, writeIORef ) import Data.Maybe ( isJust ) import Data.Char ( ord ) -import GhcIO ( IO(..) ) +import GHC.IO ( IO(..) ) +import GHC.Ptr ( Ptr(..) ) #if __GLASGOW_HASKELL__ >= 701 import Foreign.Safe -import GHC.Ptr.Unsafe ( Ptr(..) ) #else import Foreign hiding ( unsafePerformIO ) -import GHC.Ptr ( Ptr(..) ) #endif #if defined(__GLASGOW_HASKELL__) |