X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=Data%2FBool.hs;h=10ca90a33474660734184206c42985cb1f7f5d08;hb=dc372329214c1e8ef32f1a20173c3e8cc6dc0572;hp=66b804a2df4e28ce8f9bfb9d40a669c113145bb8;hpb=86a17d42a36c3272e993854b9bfa2276ae669324;p=ghc-base.git diff --git a/Data/Bool.hs b/Data/Bool.hs index 66b804a..10ca90a 100644 --- a/Data/Bool.hs +++ b/Data/Bool.hs @@ -1,4 +1,4 @@ -{-# OPTIONS -fno-implicit-prelude #-} +{-# OPTIONS_GHC -XNoImplicitPrelude #-} ----------------------------------------------------------------------------- -- | -- Module : Data.Bool @@ -17,12 +17,23 @@ module Data.Bool ( -- * Booleans Bool(..), -- ** Operations - (&&), -- :: Bool -> Bool -> Bool - (||), -- :: Bool -> Bool -> Bool - not, -- :: Bool -> Bool - otherwise, -- :: Bool + (&&), -- :: Bool -> Bool -> Bool + (||), -- :: Bool -> Bool -> Bool + not, -- :: Bool -> Bool + otherwise, -- :: Bool ) where #ifdef __GLASGOW_HASKELL__ import GHC.Base #endif + +#ifdef __NHC__ +import Prelude +import Prelude + ( Bool(..) + , (&&) + , (||) + , not + , otherwise + ) +#endif