fix this test on the 6.8 branch

ghc · Nov 1, 2007 · a6909cb · a6909cb
1 parent 6498b40
commit a6909cb
Showing 1 changed file with 3 additions and 1 deletion.
diff --git a/tests/ghc-regress/typecheck/should_compile/tc192.hs b/tests/ghc-regress/typecheck/should_compile/tc192.hs
@@ -1,11 +1,13 @@
-{-# OPTIONS -fglasgow-exts -farrows #-}
+{-# OPTIONS -fglasgow-exts -farrows -cpp #-}
 
 -- Test infix type notation and arrow notation
 
 module Test where
 
+#if __GLASGOW_HASKELL__  > 608
 import Prelude hiding (id,(.))
 import Control.Category
+#endif
 import Control.Arrow
 
 -- For readability, I use infix notation for arrow types.  I'd prefer the