[commit: ghc] wip/new-flatten-skolems-Oct14: Make this test a bit simpler (a59bfa9)
git at git.haskell.org
git at git.haskell.org
Fri Oct 31 17:46:23 UTC 2014
Repository : ssh://git@git.haskell.org/ghc
On branch : wip/new-flatten-skolems-Oct14
Link : http://ghc.haskell.org/trac/ghc/changeset/a59bfa9f55af50abfad1f5349f9b69cfc39bd226/ghc
>---------------------------------------------------------------
commit a59bfa9f55af50abfad1f5349f9b69cfc39bd226
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.
>---------------------------------------------------------------
a59bfa9f55af50abfad1f5349f9b69cfc39bd226
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