summaryrefslogtreecommitdiff
path: root/testsuite/tests/rts
diff options
context:
space:
mode:
authorSimon Marlow <marlowsd@gmail.com>2014-02-27 14:07:29 +0000
committerSimon Marlow <marlowsd@gmail.com>2014-02-27 14:07:34 +0000
commitaf6746fb6b5adb5ba5be6e0f647c4ebe767ce084 (patch)
treefce2e5cf3989597d3a1446f68c18d82bb9d1403f /testsuite/tests/rts
parent68c0d8689dd93cb0ce74a288e82f2ed997c31acc (diff)
downloadhaskell-af6746fb6b5adb5ba5be6e0f647c4ebe767ce084.tar.gz
Add hs_thread_done() (#8124)
See documentation for details.
Diffstat (limited to 'testsuite/tests/rts')
-rw-r--r--testsuite/tests/rts/Makefile3
-rw-r--r--testsuite/tests/rts/all.T8
2 files changed, 11 insertions, 0 deletions
diff --git a/testsuite/tests/rts/Makefile b/testsuite/tests/rts/Makefile
index d506d3a1ce..7f9e073ef4 100644
--- a/testsuite/tests/rts/Makefile
+++ b/testsuite/tests/rts/Makefile
@@ -84,6 +84,9 @@ T5435_dyn_asm :
T6006_setup :
'$(TEST_HC)' $(TEST_HC_OPTS) -c T6006.hs
+T8124_setup :
+ '$(TEST_HC)' $(TEST_HC_OPTS) -c T6006.hs
+
ifeq "$(TARGETPLATFORM)" "i386-unknown-mingw32"
T7037_CONST = const
else
diff --git a/testsuite/tests/rts/all.T b/testsuite/tests/rts/all.T
index dfa0e89801..d36cc21c91 100644
--- a/testsuite/tests/rts/all.T
+++ b/testsuite/tests/rts/all.T
@@ -199,3 +199,11 @@ test('T8209', [ only_ways(threaded_ways), ignore_output ],
test('T8242', [ only_ways(threaded_ways), ignore_output ],
compile_and_run, [''])
+
+test('T8124', [ omit_ways(prof_ways + ['ghci']),
+ extra_clean(['T8124_c.o']),
+ pre_cmd('$MAKE -s --no-print-directory T8124_setup') ],
+ # The T8124_setup hack is to ensure that we generate
+ # T8124_stub.h before compiling T8124_c.c, which
+ # needs it.
+ compile_and_run, ['T8124_c.c -no-hs-main'])