summaryrefslogtreecommitdiff
path: root/testsuite/tests/rts
diff options
context:
space:
mode:
Diffstat (limited to 'testsuite/tests/rts')
-rw-r--r--testsuite/tests/rts/Makefile6
-rw-r--r--testsuite/tests/rts/all.T5
2 files changed, 11 insertions, 0 deletions
diff --git a/testsuite/tests/rts/Makefile b/testsuite/tests/rts/Makefile
index 2ada2adc75..fe35bd4d2c 100644
--- a/testsuite/tests/rts/Makefile
+++ b/testsuite/tests/rts/Makefile
@@ -131,6 +131,12 @@ EventlogOutput2:
./EventlogOutput +RTS -l
ls EventlogOutput.eventlog >/dev/null
+.PHONY: EventlogOutputNull
+EventlogOutputNull:
+ "$(TEST_HC)" -eventlog -rtsopts -v0 EventlogOutput.hs
+ ./EventlogOutput +RTS -l --null-eventlog-writer
+ test ! -e EventlogOutput.eventlog
+
.PHONY: T20199
T20199:
"$(TEST_HC)" -no-hs-main -optcxx-std=c++11 -v0 T20199.cpp -o T20199
diff --git a/testsuite/tests/rts/all.T b/testsuite/tests/rts/all.T
index ab18a94218..a62585c6f4 100644
--- a/testsuite/tests/rts/all.T
+++ b/testsuite/tests/rts/all.T
@@ -170,6 +170,11 @@ test('EventlogOutput2',
omit_ways(['dyn', 'ghci'] + prof_ways) ],
makefile_test, ['EventlogOutput2'])
+test('EventlogOutputNull',
+ [ extra_files(["EventlogOutput.hs"]),
+ omit_ways(['dyn', 'ghci'] + prof_ways) ],
+ makefile_test, ['EventlogOutputNull'])
+
# Test that Info Table Provenance (IPE) events are emitted.
test('EventlogOutput_IPE',
[ extra_files(["EventlogOutput.hs"]),