Wibble: rm needless import Prelude used by Hugs.
import PrelArr -- Most of the hard work is done here
import PrelBase
#else
-import Prelude
import privileged Prelude ( PrimArray
, runST
, primNewArray
#ifdef __HUGS__
import Ix(Ix)
-import Prelude
import privileged Prelude ( IORef
, unsafePerformIO
, prelCleanupAfterRunAction
import PrelFloat ( float2Double, double2Float )
import Time ( getClockTime, ClockTime(..) )
#else
-import Prelude
import privileged Prelude
( IORef
, newIORef
--
-- Suitable for use with Hugs 98
-----------------------------------------------------------------------------
-import Prelude
import privileged Prelude ( primGetRawArgs
, primGetEnv
, prelCleanupAfterRunAction