Repository : ssh://g...@git.haskell.org/bytestring

On branch  : ghc-head
Link       : 
http://git.haskell.org/packages/bytestring.git/commitdiff/341a4c1839c757065a32805c888cdba67d2d6e19

>---------------------------------------------------------------

commit 341a4c1839c757065a32805c888cdba67d2d6e19
Author: Duncan Coutts <dun...@community.haskell.org>
Date:   Tue Sep 17 12:30:11 2013 +0100

    Unbreak the testsuite


>---------------------------------------------------------------

341a4c1839c757065a32805c888cdba67d2d6e19
 tests/TestFramework.hs |    2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/tests/TestFramework.hs b/tests/TestFramework.hs
index f8da491..83df0d2 100644
--- a/tests/TestFramework.hs
+++ b/tests/TestFramework.hs
@@ -48,7 +48,7 @@ testProperty name p = [(name, runQcTest)]
                    }
 
 assertBool :: String -> Bool -> Bool
-assertBool = const
+assertBool _ = id
 
 testCase :: String -> Bool -> Test
 testCase name tst = [(name, runPlainTest)]

_______________________________________________
ghc-commits mailing list
ghc-commits@haskell.org
http://www.haskell.org/mailman/listinfo/ghc-commits

Reply via email to