[project @ 1998-06-01 13:06:18 by simonm]

add seq test.

diff --git a/ghc/tests/codeGen/should_run/Makefile b/ghc/tests/codeGen/should_run/Makefile
index 2d75c34..e1caa6c 100644 (file)
--- a/ghc/tests/codeGen/should_run/Makefile
+++ b/ghc/tests/codeGen/should_run/Makefile
@@ -20,5 +20,6 @@ cg042_HC_OPTS = -fglasgow-exts
 cg016_RUNTEST_OPTS = -x 1      # should override the -x 0 above.
 cg021_RUNTEST_OPTS = +RTS -K2m
 cg025_RUNTEST_OPTS = -x 1 cg025.hs
+cg045_RUNTEST_OPTS = -x 1
 
 include $(TOP)/mk/target.mk

diff --git a/ghc/tests/codeGen/should_run/cg045.hs b/ghc/tests/codeGen/should_run/cg045.hs
new file mode 100644 (file)
index 0000000..6bff505
--- /dev/null
+++ b/ghc/tests/codeGen/should_run/cg045.hs
@@ -0,0 +1,3 @@
+module Main (main) where
+
+main = seq (error "hello world!" :: Int) (return ())

diff --git a/ghc/tests/codeGen/should_run/cg045.stderr b/ghc/tests/codeGen/should_run/cg045.stderr
new file mode 100644 (file)
index 0000000..df8bdc1
--- /dev/null
+++ b/ghc/tests/codeGen/should_run/cg045.stderr
@@ -0,0 +1,2 @@
+
+Fail: hello world!
\ No newline at end of file