[commit: ghc] master: testsuite: Fix output due to recent COMPLETE changes (ca538b8)

git at git.haskell.org git at git.haskell.org
Fri Mar 3 14:25:25 UTC 2017


Repository : ssh://git@git.haskell.org/ghc

On branch  : master
Link       : http://ghc.haskell.org/trac/ghc/changeset/ca538b84e78b2b58161ca4c0910a65937c374b9c/ghc

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

commit ca538b84e78b2b58161ca4c0910a65937c374b9c
Author: Ben Gamari <ben at smart-cactus.org>
Date:   Thu Mar 2 21:34:51 2017 -0500

    testsuite: Fix output due to recent COMPLETE changes
    
    It's unclear why this didn't show up in my initial local validation. Oh
    well.


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

ca538b84e78b2b58161ca4c0910a65937c374b9c
 testsuite/tests/parser/should_fail/T12429.stderr           | 5 +----
 testsuite/tests/parser/should_fail/T12811.stderr           | 5 +----
 testsuite/tests/pmcheck/complete_sigs/completesig04.stderr | 4 +++-
 3 files changed, 5 insertions(+), 9 deletions(-)

diff --git a/testsuite/tests/parser/should_fail/T12429.stderr b/testsuite/tests/parser/should_fail/T12429.stderr
index fde11ec..e29388f 100644
--- a/testsuite/tests/parser/should_fail/T12429.stderr
+++ b/testsuite/tests/parser/should_fail/T12429.stderr
@@ -1,7 +1,4 @@
 
-testsuite/tests/parser/should_fail/T12429.hs:2:29: error:
+T12429.hs:2:29: error:
     parse error on input ‘Y’
     Perhaps you intended to use PatternSynonyms
-  |
-2 |   import Data.Text (pattern Y)
-  |                             ^
diff --git a/testsuite/tests/parser/should_fail/T12811.stderr b/testsuite/tests/parser/should_fail/T12811.stderr
index de22baf..e9cf78f 100644
--- a/testsuite/tests/parser/should_fail/T12811.stderr
+++ b/testsuite/tests/parser/should_fail/T12811.stderr
@@ -1,7 +1,4 @@
 
-testsuite/tests/parser/should_fail/T12811.hs:4:15: error:
+T12811.hs:4:15: error:
     Illegal symbol '.' in type
     Perhaps you meant to write 'forall <tvs>. <type>'?
-  |
-4 | foo :: foral a. a -> a
-  |               ^
diff --git a/testsuite/tests/pmcheck/complete_sigs/completesig04.stderr b/testsuite/tests/pmcheck/complete_sigs/completesig04.stderr
index b72cf6e..de990c7 100644
--- a/testsuite/tests/pmcheck/complete_sigs/completesig04.stderr
+++ b/testsuite/tests/pmcheck/complete_sigs/completesig04.stderr
@@ -1,4 +1,6 @@
 
 completesig04.hs:3:1: error:
-    • Cannot form a group of complete patterns from patterns ‘Just’ and ‘Left’ as they match different type constructors (‘Maybe’ resp. ‘Either’)
+    • Orphan COMPLETE pragmas not supported
+      A COMPLETE pragma must mention at least one data constructor
+      or pattern synonym defined in the same module.
     • In {-# COMPLETE Just, Left #-}



More information about the ghc-commits mailing list