[commit: ghc] master: Make this test a bit simpler (f02c915)
git at git.haskell.org
git at git.haskell.org
Tue Nov 4 10:39:11 UTC 2014
Repository : ssh://git@git.haskell.org/ghc
On branch : master
Link : http://ghc.haskell.org/trac/ghc/changeset/f02c915c1583e40d614dfd97047d5117a9b8a9a5/ghc
>---------------------------------------------------------------
commit f02c915c1583e40d614dfd97047d5117a9b8a9a5
Author: Simon Peyton Jones <simonpj at microsoft.com>
Date: Fri Oct 31 12:28:42 2014 +0000
Make this test a bit simpler
There were two unrelated functions, and the `-ddump-rule-firings` output
was coming in a non-deterministic order as a result. So now there is just
one function.
>---------------------------------------------------------------
f02c915c1583e40d614dfd97047d5117a9b8a9a5
testsuite/tests/simplCore/should_compile/T6056.hs | 6 ++----
testsuite/tests/simplCore/should_compile/T6056.stderr | 7 -------
2 files changed, 2 insertions(+), 11 deletions(-)
diff --git a/testsuite/tests/simplCore/should_compile/T6056.hs b/testsuite/tests/simplCore/should_compile/T6056.hs
index e24631d..d2d8349 100644
--- a/testsuite/tests/simplCore/should_compile/T6056.hs
+++ b/testsuite/tests/simplCore/should_compile/T6056.hs
@@ -1,8 +1,6 @@
module T6056 where
import T6056a
-foo1 :: Int -> (Maybe Int, [Int])
-foo1 x = smallerAndRest x [x]
+foo :: Int -> (Maybe Int, [Int])
+foo x = smallerAndRest x [x]
-foo2 :: Integer -> (Maybe Integer, [Integer])
-foo2 x = smallerAndRest x [x]
diff --git a/testsuite/tests/simplCore/should_compile/T6056.stderr b/testsuite/tests/simplCore/should_compile/T6056.stderr
index d9d4193..5695bd5 100644
--- a/testsuite/tests/simplCore/should_compile/T6056.stderr
+++ b/testsuite/tests/simplCore/should_compile/T6056.stderr
@@ -1,13 +1,6 @@
Rule fired: foldr/nil
-Rule fired: foldr/nil
-Rule fired: SPEC/T6056 $wsmallerAndRest @ Integer
Rule fired: SPEC/T6056 $wsmallerAndRest @ Int
Rule fired: Class op <
-Rule fired: Class op <
-Rule fired: SPEC/T6056 $wsmallerAndRest @ Integer
-Rule fired: SPEC/T6056 $wsmallerAndRest @ Integer
Rule fired: SPEC/T6056 $wsmallerAndRest @ Int
Rule fired: SPEC/T6056 $wsmallerAndRest @ Int
Rule fired: SPEC/T6056 $wsmallerAndRest @ Int
-Rule fired: SPEC/T6056 $wsmallerAndRest @ Integer
-
More information about the ghc-commits
mailing list