[project @ 1997-07-05 00:56:24 by sof]

[ghc-hetmet.git] / ghc / lib / glaExts / PackedString.lhs

diff --git a/ghc/lib/glaExts/PackedString.lhs b/ghc/lib/glaExts/PackedString.lhs
index 6816243..b04a71b 100644 (file)
--- a/ghc/lib/glaExts/PackedString.lhs
+++ b/ghc/lib/glaExts/PackedString.lhs
@@ -78,6 +78,7 @@ import {-# SOURCE #-} IOBase  ( error )
 import Ix
 import PrelList
 import STBase
+import UnsafeST        ( unsafePerformPrimIO )
 import ArrBase
 import PrelBase
 import Foreign ( Addr(..) )