Commit ae94844f authored by Ian Lynagh's avatar Ian Lynagh

Improve test T5373

parent 41cfaef3
......@@ -35,7 +35,9 @@ T5373:
'$(TEST_HC)' $(TEST_HC_OPTS) -v0 -dynamic --make T5373A
'$(TEST_HC)' $(TEST_HC_OPTS) -v0 -dynamic --make T5373B -rtsopts
'$(TEST_HC)' $(TEST_HC_OPTS) -v0 -dynamic --make T5373C -rtsopts=some
-./T5373A +RTS -\? 2>&1 | grep "Most RTS options are disabled"
-./T5373B +RTS -\? 2>&1 | grep "Most RTS options are disabled"
-./T5373C +RTS -\? 2>&1 | grep "Most RTS options are disabled"
'$(TEST_HC)' $(TEST_HC_OPTS) -v0 -dynamic --make T5373D -rtsopts=none
-./T5373A +RTS -\? 2>&1 | grep disabled
-./T5373B +RTS -\? 2>&1 | grep disabled
-./T5373C +RTS -\? 2>&1 | grep disabled
-./T5373D +RTS -\? 2>&1 | grep disabled
T5373A: Most RTS options are disabled. Link with -rtsopts to enable them.
T5373C: Most RTS options are disabled. Link with -rtsopts to enable them.
T5373D: RTS options are disabled. Link with -rtsopts to enable them.
main :: IO ()
main = return ()
......@@ -19,10 +19,12 @@ test('T4464',
['$MAKE --no-print-directory -s T4464'])
test('T5373',
extra_clean(['T5373A.hi', 'T5373B.hi', 'T5373C.hi',
'T5373A.o', 'T5373B.o', 'T5373C.o',
'T5373A', 'T5373B', 'T5373C',
'T5373A.exe', 'T5373B.exe', 'T5373C.exe']),
[extra_clean(['T5373A.hi', 'T5373B.hi', 'T5373C.hi', 'T5373D.hi',
'T5373A.o', 'T5373B.o', 'T5373C.o', 'T5373D.o',
'T5373A', 'T5373B', 'T5373C', 'T5373D',
'T5373A.exe', 'T5373B.exe', 'T5373C.exe', 'T5373D.exe']),
if_os('mingw32', expect_broken(5373)),
if_os('darwin', expect_broken(5373))],
run_command,
['$MAKE --no-print-directory -s T5373'])
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment