[commit: ghc] master: testsuite: Add test for #13609 (18fbb9d)

git at git.haskell.org git at git.haskell.org
Mon May 1 14:52:25 UTC 2017


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

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

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

commit 18fbb9d32cbc157e3bbd235e392f1625f77321e3
Author: Ben Gamari <ben at smart-cactus.org>
Date:   Sun Apr 30 23:19:26 2017 -0400

    testsuite: Add test for #13609


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

18fbb9d32cbc157e3bbd235e392f1625f77321e3
 testsuite/tests/stage1/T13609.hs     | 5 +++++
 testsuite/tests/stage1/T13609.stderr | 3 +++
 testsuite/tests/stage1/all.T         | 1 +
 3 files changed, 9 insertions(+)

diff --git a/testsuite/tests/stage1/T13609.hs b/testsuite/tests/stage1/T13609.hs
new file mode 100644
index 0000000..e67eb32
--- /dev/null
+++ b/testsuite/tests/stage1/T13609.hs
@@ -0,0 +1,5 @@
+module M where
+
+{-# ANN myId "HLint: ignore" #-}
+myId :: a -> a
+myId x = x
diff --git a/testsuite/tests/stage1/T13609.stderr b/testsuite/tests/stage1/T13609.stderr
new file mode 100644
index 0000000..0a3c1cd
--- /dev/null
+++ b/testsuite/tests/stage1/T13609.stderr
@@ -0,0 +1,3 @@
+
+T13609.hs:3:1: warning:
+    Ignoring Ann annotation, because this is a stage-1 compiler without -fexternal-interpreter or doesn't support GHCi
diff --git a/testsuite/tests/stage1/all.T b/testsuite/tests/stage1/all.T
index a7f01b3..40bb274 100644
--- a/testsuite/tests/stage1/all.T
+++ b/testsuite/tests/stage1/all.T
@@ -4,3 +4,4 @@ setTestOpts(unless(config.stage == 1, skip))
 # Test with stage1 compiler, see ticket:10382#comment:20.
 test('T2632', normal, compile,
      ['-XTemplateHaskellQuotes -package template-haskell'])
+test('T13609', normal, compile, [''])



More information about the ghc-commits mailing list