1 We add the option -fno-implicit-prelude here to tell the reader that
2 special names such as () and -> shouldn't be resolved to Prelude.()
3 and Prelude.-> (as they are normally). -- SDM 8/10/97
6 {-# OPTIONS -fno-implicit-prelude #-}
10 -- Everything from these modules
12 -- Everything corresponding to the Report's PreludeText
14 Read(readsPrec, readList),
15 Show(showsPrec, showList, show),
16 reads, shows, read, lex,
17 showChar, showString, readParen, showParen,
19 -- Everything corresponding to the Report's PreludeIO
21 ioError, userError, catch,
22 putChar, putStr, putStrLn, print,
23 getChar, getLine, getContents, interact,
24 readFile, writeFile, appendFile, readIO, readLn,
30 Char, String, Int, Integer, Float, Double, IO,
35 -- Includes tuple types + fst, snd, curry, uncurry
36 ()(..), -- The unit type
43 Num((+), (-), (*), negate, abs, signum, fromInteger, fromInt{-glaExt-}),
45 Integral(quot, rem, div, mod, quotRem, divMod, toInteger, toInt{-partain-}),
54 mapM, mapM_, sequence, sequence_, (=<<),
57 (&&), (||), not, otherwise,
58 subtract, even, odd, gcd, lcm, (^), (^^),
59 fromIntegral, realToFrac,
60 --exported by PrelTup: fst, snd, curry, uncurry,
61 id, const, (.), flip, ($), until,
62 asTypeOf, error, undefined,
68 import PrelList hiding ( takeUInt )
79 import PrelErr ( error )
84 ($!) :: (a -> b) -> a -> b
87 -- It is expected that compilers will recognize this and insert error
88 -- messages which are more appropriate to the context in which undefined
92 undefined = error "Prelude.undefined"