fix nhc98 build: need a qualified Prelude import

[ghc-base.git] / Control / Arrow.hs

diff --git a/Control/Arrow.hs b/Control/Arrow.hs
index 76c0212..66c7745 100644 (file)
--- a/Control/Arrow.hs
+++ b/Control/Arrow.hs
@@ -37,6 +37,7 @@ module Control.Arrow (
        ) where
 
 import Prelude hiding (id,(.))
+import qualified Prelude
 
 import Control.Monad
 import Control.Monad.Fix