diff options
| author | Oleg Grenrus <oleg.grenrus@iki.fi> | 2021-08-31 16:07:16 +0300 |
|---|---|---|
| committer | Marge Bot <ben+marge-bot@smart-cactus.org> | 2021-10-15 18:16:14 -0400 |
| commit | 88e913d443203376454b5242efa5fff0928992a8 (patch) | |
| tree | 0da963e6cbfdb078147cacc3461dd5810c5a27c9 /testsuite/tests/rts | |
| parent | 1cda768c86e533c917a495c8de0468960cbe7a52 (diff) | |
| download | haskell-88e913d443203376454b5242efa5fff0928992a8.tar.gz | |
Null eventlog writer
Diffstat (limited to 'testsuite/tests/rts')
| -rw-r--r-- | testsuite/tests/rts/Makefile | 6 | ||||
| -rw-r--r-- | testsuite/tests/rts/all.T | 5 |
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"]), |