[commit: testsuite] master: Test Trac #8333 (57330d4)
git at git.haskell.org
git at git.haskell.org
Fri Sep 20 16:38:33 CEST 2013
Repository : ssh://git@git.haskell.org/testsuite
On branch : master
Link : http://ghc.haskell.org/trac/ghc/changeset/57330d4aabb06c1e976853c638e5a6f640478d86/testsuite
>---------------------------------------------------------------
commit 57330d4aabb06c1e976853c638e5a6f640478d86
Author: Simon Peyton Jones <simonpj at microsoft.com>
Date: Fri Sep 20 15:35:21 2013 +0100
Test Trac #8333
>---------------------------------------------------------------
57330d4aabb06c1e976853c638e5a6f640478d86
tests/th/Makefile | 3 +++
tests/th/T8333.hs | 5 +++++
tests/th/T8333.stdout | 7 +++++++
tests/th/all.T | 5 +++++
4 files changed, 20 insertions(+)
diff --git a/tests/th/Makefile b/tests/th/Makefile
index f7f3665..c184600 100644
--- a/tests/th/Makefile
+++ b/tests/th/Makefile
@@ -34,3 +34,6 @@ TH_Depends:
'$(TEST_HC)' $(TEST_HC_OPTS) $(ghcThWayFlags) --make -v0 TH_Depends
./TH_Depends
+
+T8333:
+ $(TEST_HC) $(TEST_HC_OPTS) $(ghcThWayFlags) --interactive T8333.hs < /dev/null
diff --git a/tests/th/T8333.hs b/tests/th/T8333.hs
new file mode 100644
index 0000000..e81f07c
--- /dev/null
+++ b/tests/th/T8333.hs
@@ -0,0 +1,5 @@
+{-# LANGUAGE TemplateHaskell #-}
+{-# OPTIONS_GHC -fno-omit-interface-pragmas #-}
+
+main :: IO ()
+main = return ()
diff --git a/tests/th/T8333.stdout b/tests/th/T8333.stdout
new file mode 100644
index 0000000..8865fc1
--- /dev/null
+++ b/tests/th/T8333.stdout
@@ -0,0 +1,7 @@
+GHCi, version 7.7.20130919: http://www.haskell.org/ghc/ :? for help
+Loading package ghc-prim ... linking ... done.
+Loading package integer-gmp ... linking ... done.
+Loading package base ... linking ... done.
+[1 of 1] Compiling Main ( T8333.hs, interpreted )
+Ok, modules loaded: Main.
+*Main> Leaving GHCi.
diff --git a/tests/th/all.T b/tests/th/all.T
index d3d0db0..c8b0cab 100644
--- a/tests/th/all.T
+++ b/tests/th/all.T
@@ -288,3 +288,8 @@ test('TH_Roles3', normal, compile, ['-v0 -dsuppress-uniques'])
test('TH_Roles4', normal, compile, ['-v0'])
test('T8186', normal, compile_and_run, ['-v0'])
+
+test('T8333',
+ normal,
+ run_command,
+ ['$MAKE -s --no-print-directory T8333'])
More information about the ghc-commits
mailing list