diff options
Diffstat (limited to 'dev-haskell/lifted-base/files/lifted-base-0.1.1-test-ghc-6.12.patch')
| -rw-r--r-- | dev-haskell/lifted-base/files/lifted-base-0.1.1-test-ghc-6.12.patch | 19 |
1 files changed, 19 insertions, 0 deletions
diff --git a/dev-haskell/lifted-base/files/lifted-base-0.1.1-test-ghc-6.12.patch b/dev-haskell/lifted-base/files/lifted-base-0.1.1-test-ghc-6.12.patch new file mode 100644 index 000000000000..fe92161bbf03 --- /dev/null +++ b/dev-haskell/lifted-base/files/lifted-base-0.1.1-test-ghc-6.12.patch @@ -0,0 +1,19 @@ +--- lifted-base-0.1.1-orig/test/test.hs 2012-04-28 23:47:19.000000000 +1000 ++++ lifted-base-0.1.1/test/test.hs 2012-05-04 11:21:19.840997008 +1000 +@@ -1,4 +1,4 @@ +-{-# LANGUAGE DeriveDataTypeable, FlexibleContexts #-} ++{-# LANGUAGE DeriveDataTypeable, FlexibleContexts, CPP #-} + + -- from base: + import Prelude hiding (catch) +@@ -38,7 +38,9 @@ + main :: IO () + main = defaultMain + [ testSuite "IdentityT" runIdentityT +- , testSuite "ListT" $ fmap head . runListT ++#if MIN_VERSION_base(4,3,0) ++ , testSuite "ListT" $ fmap head . runListT -- this test fails with ghc 6.12.3 ++#endif + , testSuite "MaybeT" $ fmap fromJust . runMaybeT + , testSuite "ReaderT" $ flip runReaderT "reader state" + , testSuite "WriterT" runWriterT' |