summaryrefslogtreecommitdiff
path: root/testsuite/tests/ghci/should_run/Makefile
diff options
context:
space:
mode:
Diffstat (limited to 'testsuite/tests/ghci/should_run/Makefile')
-rw-r--r--testsuite/tests/ghci/should_run/Makefile9
1 files changed, 9 insertions, 0 deletions
diff --git a/testsuite/tests/ghci/should_run/Makefile b/testsuite/tests/ghci/should_run/Makefile
new file mode 100644
index 0000000000..3354196188
--- /dev/null
+++ b/testsuite/tests/ghci/should_run/Makefile
@@ -0,0 +1,9 @@
+TOP=../../..
+include $(TOP)/mk/boilerplate.mk
+include $(TOP)/mk/test.mk
+
+# Test that threadDelay can be interrupted by ^C.
+3171:
+ echo "do Control.Concurrent.threadDelay 3000000; putStrLn \"threadDelay was not interrupted\"" | \
+ "$(TEST_HC)" $(TEST_HC_OPTS) -ignore-dot-ghci -v0 --interactive 2>3171.err & \
+ sleep 2; kill -INT $$!; wait