summaryrefslogtreecommitdiff
path: root/testsuite
diff options
context:
space:
mode:
authorThomas Miedema <thomasmiedema@gmail.com>2016-05-25 21:23:09 +0200
committerThomas Miedema <thomasmiedema@gmail.com>2016-05-25 21:30:58 +0200
commit5020bc8fd2a99a557f45ea5abf8240ac995cc03d (patch)
treebb83800fd6ae1ea788b09b9be142dd2756420b32 /testsuite
parentf07bf19ec49d25395dd47923ba5e6b525ce7e68f (diff)
downloadhaskell-5020bc8fd2a99a557f45ea5abf8240ac995cc03d.tar.gz
Testsuite: add a test for #5522 (-fliberate-case -fspec-constr)
Diffstat (limited to 'testsuite')
-rw-r--r--testsuite/tests/deSugar/should_run/all.T6
1 files changed, 6 insertions, 0 deletions
diff --git a/testsuite/tests/deSugar/should_run/all.T b/testsuite/tests/deSugar/should_run/all.T
index 7bc911ed56..fce86c51c3 100644
--- a/testsuite/tests/deSugar/should_run/all.T
+++ b/testsuite/tests/deSugar/should_run/all.T
@@ -32,6 +32,12 @@ test('T3382', normal, compile_and_run, [''])
test('mc01', normal, compile_and_run, [''])
test('mc02', normal, compile_and_run, [''])
test('mc03', normal, compile_and_run, [''])
+
+# #5522: "I noticed that test mc03 runs out of memory compiled with
+# -O -fliberate-case -fspec-constr."
+test('T5522', [only_ways(['optasm']), extra_files(['mc03.hs'])], multimod_compile,
+ ['mc03', '-fliberate-case -fspec-constr -v0 +RTS -M1G -RTS'])
+
test('mc04', normal, compile_and_run, [''])
test('mc05', normal, compile_and_run, [''])
test('mc06', normal, compile_and_run, [''])