-import CPUTime (getCPUTime)
-import PrelST
-import PrelRead
-import PrelShow
-import PrelNum -- So we get fromInt, toInt
-import PrelIOBase
-import PrelNumExtra ( float2Double, double2Float )
-import PrelBase
-import PrelArr
-import Char ( isSpace, chr, ord )
-import Time (getClockTime, ClockTime(..))
-
+#ifndef __HUGS__
+import PrelGHC ( RealWorld )
+import PrelShow ( showSignedInt, showSpace )
+import PrelRead ( readDec )
+import PrelIOBase ( unsafePerformIO, stToIO )
+import PrelArr ( STRef, newSTRef, readSTRef, writeSTRef )
+import Time ( getClockTime, ClockTime(..) )
+#else
+import PrelPrim ( IORef
+ , newIORef
+ , readIORef
+ , writeIORef
+ , unsafePerformIO
+ )
+#endif
+
+import CPUTime ( getCPUTime )
+import Char ( isSpace, chr, ord )