From: andy Date: Thu, 30 Mar 2000 09:04:34 +0000 (+0000) Subject: [project @ 2000-03-30 09:04:34 by andy] X-Git-Tag: Approximately_9120_patches~4879 X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=03d3a5113ae074809479c96ee08b18cb5fb80b39;p=ghc-hetmet.git [project @ 2000-03-30 09:04:34 by andy] Wibble One. --- diff --git a/ghc/lib/std/Array.lhs b/ghc/lib/std/Array.lhs index 9c32f4a..5ee94ff 100644 --- a/ghc/lib/std/Array.lhs +++ b/ghc/lib/std/Array.lhs @@ -45,6 +45,7 @@ import PrelShow import PrelArr -- Most of the hard work is done here import PrelBase #else +import Prelude import privileged Prelude ( PrimArray , runST , primNewArray diff --git a/ghc/lib/std/IO.lhs b/ghc/lib/std/IO.lhs index 67a491f..7ddeb03 100644 --- a/ghc/lib/std/IO.lhs +++ b/ghc/lib/std/IO.lhs @@ -87,6 +87,7 @@ module IO ( #ifdef __HUGS__ import Ix(Ix) +import Prelude import privileged Prelude ( IORef , unsafePerformIO , prelCleanupAfterRunAction diff --git a/ghc/lib/std/System.lhs b/ghc/lib/std/System.lhs index 1b7637d..ab4f9d9 100644 --- a/ghc/lib/std/System.lhs +++ b/ghc/lib/std/System.lhs @@ -188,6 +188,7 @@ unpackProgName argv -- -- Suitable for use with Hugs 98 ----------------------------------------------------------------------------- +import Prelude import privileged Prelude ( primGetRawArgs , primGetEnv , prelCleanupAfterRunAction