[project @ 2003-04-11 11:10:57 by ross]
[ghc-base.git] / Control / Monad / ST.hs
index 59b303f..7341cef 100644 (file)
@@ -35,6 +35,10 @@ import Prelude
 import Control.Monad.Fix
 import Data.Dynamic
 
+#ifdef __HUGS__
+import Hugs.ST
+#endif
+
 #ifdef __GLASGOW_HASKELL__
 import GHC.ST
 import GHC.Base                ( unsafeCoerce#, RealWorld )