summaryrefslogtreecommitdiff
path: root/testsuite/tests/rts/flags/T17720/all.T
diff options
context:
space:
mode:
Diffstat (limited to 'testsuite/tests/rts/flags/T17720/all.T')
-rw-r--r--testsuite/tests/rts/flags/T17720/all.T20
1 files changed, 20 insertions, 0 deletions
diff --git a/testsuite/tests/rts/flags/T17720/all.T b/testsuite/tests/rts/flags/T17720/all.T
new file mode 100644
index 0000000000..d3921bc112
--- /dev/null
+++ b/testsuite/tests/rts/flags/T17720/all.T
@@ -0,0 +1,20 @@
+test('T17720a',
+ [extra_run_opts('+RTS -ibogus'),
+ exit_code(1), check_errmsg('bad value for -i'), extra_files(['T17720.hs']),
+ only_ways(['normal'])],
+ multimod_compile_and_run,
+ ['T17720', '-rtsopts'])
+
+test('T17720b',
+ [extra_run_opts('+RTS -Cv'),
+ exit_code(1), check_errmsg('bad value for -C'), extra_files(['T17720.hs']),
+ only_ways(['normal'])],
+ multimod_compile_and_run,
+ ['T17720', '-rtsopts'])
+
+test('T17720c',
+ [extra_run_opts('+RTS -V3b'),
+ exit_code(1), check_errmsg('bad value for -V'), extra_files(['T17720.hs']),
+ only_ways(['normal'])],
+ multimod_compile_and_run,
+ ['T17720', '-rtsopts']) \ No newline at end of file