[commit: ghc] master: Add test for #10600 (exhaustiveness check with --make and -fno-code) (aa23054)

git at git.haskell.org git at git.haskell.org
Thu Aug 6 18:57:11 UTC 2015


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

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

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

commit aa230540f5868263740fd7d2f31505a39e2fcb4e
Author: Reid Barton <rwbarton at gmail.com>
Date:   Thu Aug 6 14:12:38 2015 -0400

    Add test for #10600 (exhaustiveness check with --make and -fno-code)


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

aa230540f5868263740fd7d2f31505a39e2fcb4e
 testsuite/tests/driver/{T8101.hs => T8101b.hs}         | 0
 testsuite/tests/driver/{T8101.stderr => T8101b.stderr} | 2 +-
 testsuite/tests/driver/all.T                           | 2 ++
 3 files changed, 3 insertions(+), 1 deletion(-)

diff --git a/testsuite/tests/driver/T8101.hs b/testsuite/tests/driver/T8101b.hs
similarity index 100%
copy from testsuite/tests/driver/T8101.hs
copy to testsuite/tests/driver/T8101b.hs
diff --git a/testsuite/tests/driver/T8101.stderr b/testsuite/tests/driver/T8101b.stderr
similarity index 84%
copy from testsuite/tests/driver/T8101.stderr
copy to testsuite/tests/driver/T8101b.stderr
index 6fda857..555b036 100644
--- a/testsuite/tests/driver/T8101.stderr
+++ b/testsuite/tests/driver/T8101b.stderr
@@ -1,5 +1,5 @@
 
-T8101.hs:7:9: Warning:
+T8101b.hs:7:9: Warning:
     Pattern match(es) are non-exhaustive
     In a case alternative:
         Patterns not matched:
diff --git a/testsuite/tests/driver/all.T b/testsuite/tests/driver/all.T
index 65c3776..b79f166 100644
--- a/testsuite/tests/driver/all.T
+++ b/testsuite/tests/driver/all.T
@@ -398,6 +398,8 @@ test('T8959a',
 test('T703', normal, run_command, ['$MAKE -s --no-print-directory T703'])
 test('T2182', normal, run_command, ['$MAKE -s --no-print-directory T2182'])
 test('T8101', normal, compile, ['-Wall -fno-code'])
+test('T8101b', expect_broken(10600), multimod_compile,
+     ['T8101b', '-Wall -fno-code'])
 
 def build_T9050(name, way):
      return simple_build(name + '.cmm', way, '-outputdir=. ', 0, '', 0, 0, 0)



More information about the ghc-commits mailing list