Commit cc704794 authored by ross's avatar ross

[project @ 2004-11-09 17:57:33 by ross]

mark GHC-specific tests
parent c26fbe1e
......@@ -6,5 +6,5 @@ setTestOpts(f)
# Missing:
# test('cc002', normal, compile_fail, [''])
test('cc005', normal, compile_fail, [''])
test('cc005', only_compiler_types(['ghc']), compile_fail, [''])
test('cg001', normal, compile, [''])
test('cg001', only_compiler_types(['ghc']), compile, [''])
test('cg002', normal, compile, [''])
test('cg003', only_ways(['opt']), compile, ['-fvia-C'])
test('cg004', normal, compile, [''])
......@@ -9,13 +9,13 @@ test('cg008', normal, compile_and_run, [''])
test('cg009', normal, compile_and_run, [''])
test('cg010', normal, compile_and_run, [''])
test('cg011', normal, compile_and_run, [''])
test('cg012', normal, compile_and_run, ['-fglasgow-exts'])
test('cg012', only_compiler_types(['ghc']), compile_and_run, ['-fglasgow-exts'])
test('cg013', normal, compile_and_run, [''])
test('cg014', normal, compile_and_run, [''])
test('cg015', normal, compile_and_run, ['-fglasgow-exts'])
test('cg015', only_compiler_types(['ghc']), compile_and_run, ['-fglasgow-exts'])
test('cg016', exit_code(1), compile_and_run, [''])
test('cg017', normal, compile_and_run, [''])
test('cg018', normal, compile_and_run, ['-fglasgow-exts'])
test('cg018', only_compiler_types(['ghc']), compile_and_run, ['-fglasgow-exts'])
test('cg019', normal, compile_and_run, [''])
test('cg020', normal, compile_and_run, [''])
test('cg021', normal, compile_and_run, [''])
......@@ -25,12 +25,12 @@ test('cg024', normal, compile_and_run, [''])
test('cg025', compose(extra_run_opts('cg025.hs'),exit_code(1)), \
compile_and_run, [''])
test('cg026', normal, compile_and_run, [''])
test('cg026', only_compiler_types(['ghc']), compile_and_run, [''])
test('cg027', normal, compile_and_run, [''])
test('cg028', normal, compile_and_run, [''])
test('cg031', normal, compile_and_run, ['-fglasgow-exts'])
test('cg032', normal, compile_and_run, ['-fglasgow-exts'])
test('cg033', normal, compile_and_run, ['-fglasgow-exts'])
test('cg031', only_compiler_types(['ghc']), compile_and_run, ['-fglasgow-exts'])
test('cg032', only_compiler_types(['ghc']), compile_and_run, ['-fglasgow-exts'])
test('cg033', only_compiler_types(['ghc']), compile_and_run, ['-fglasgow-exts'])
test('cg034', normal, compile_and_run, [''])
test('cg035', normal, compile_and_run, ['-fglasgow-exts'])
test('cg036', normal, compile_and_run, [''])
......
......@@ -16,38 +16,45 @@ test('conc003', normal, compile_and_run, [''])
test('conc004', omit_ways(['ghci']), compile_and_run, [''])
test('conc006', normal, compile_and_run, [''])
test('conc007', extra_run_opts('+RTS -H128M -RTS'), compile_and_run, [''])
test('conc008', normal, compile_and_run, [''])
test('conc009', exit_code(1), compile_and_run, [''])
test('conc010', normal, compile_and_run, [''])
test('conc007', compose(only_compiler_types(['ghc']),
extra_run_opts('+RTS -H128M -RTS')),
compile_and_run, [''])
test('conc008', only_compiler_types(['ghc']), compile_and_run, [''])
test('conc009', compose(only_compiler_types(['ghc']), exit_code(1)),
compile_and_run, [''])
test('conc010', only_compiler_types(['ghc']), compile_and_run, [''])
test('conc012', normal, compile_and_run, [''])
# hangs for ever with the threaded RTS
test('conc013', omit_ways(['threaded']), compile_and_run, [''])
test('conc014', normal, compile_and_run, [''])
test('conc015', normal, compile_and_run, [''])
test('conc016', normal, compile_and_run, [''])
test('conc017', normal, compile_and_run, [''])
test('conc018', normal, compile_and_run, [''])
test('conc019', extra_run_opts('+RTS -K4m -RTS'), compile_and_run, [''])
test('conc020', normal, compile_and_run, [''])
test('conc014', only_compiler_types(['ghc']), compile_and_run, [''])
test('conc015', only_compiler_types(['ghc']), compile_and_run, [''])
test('conc016', only_compiler_types(['ghc']), compile_and_run, [''])
test('conc017', only_compiler_types(['ghc']), compile_and_run, [''])
test('conc018', only_compiler_types(['ghc']), compile_and_run, [''])
test('conc019', compose(only_compiler_types(['ghc']),
extra_run_opts('+RTS -K4m -RTS')),
compile_and_run, [''])
test('conc020', only_compiler_types(['ghc']), compile_and_run, [''])
test('conc021', compose(omit_ways(['ghci']), exit_code(1)),
compile_and_run, [''])
test('conc022', normal, compile_and_run, [''])
test('conc023', normal, compile_and_run, [''])
test('conc024', normal, compile_and_run, [''])
test('conc022', only_compiler_types(['ghc']), compile_and_run, [''])
test('conc023', only_compiler_types(['ghc']), compile_and_run, [''])
test('conc024', only_compiler_types(['ghc']), compile_and_run, [''])
test('conc025', normal, compile_and_run, [''])
test('conc026', normal, compile_and_run, [''])
test('conc026', only_compiler_types(['ghc']), compile_and_run, [''])
test('conc027', normal, compile_and_run, [''])
test('conc028', normal, compile_and_run, [''])
test('conc029', normal, compile_and_run, [''])
test('conc030', extra_run_opts('+RTS -K2M -RTS'), compile_and_run, [''])
test('conc030', compose(only_compiler_types(['ghc']),
extra_run_opts('+RTS -K2M -RTS')),
compile_and_run, [''])
# Skip for now, hangs for ever (broken?)
test('conc031', skip, compile_and_run, [''])
test('conc032', normal, compile_and_run, [''])
test('conc032', only_compiler_types(['ghc']), compile_and_run, [''])
# Omit for GHCi, because it just sits there waiting for you to press ^C
# Also hangs with the threaded RTS
......@@ -55,12 +62,13 @@ test('conc033', omit_ways(['ghci','threaded']), compile_and_run, [''])
# Omit for GHCi, because it just sits there waiting for you to press ^C
# Also hangs with the threaded RTS
test('conc034', compose(omit_ways(['ghci','threaded']),
extra_run_opts('+RTS -C0 -RTS')),
test('conc034', compose(only_compiler_types(['ghc']),
compose(omit_ways(['ghci','threaded']),
extra_run_opts('+RTS -C0 -RTS'))),
compile_and_run, [''])
test('conc035', normal, compile_and_run, [''])
test('conc036', normal, compile_and_run, [''])
test('conc035', only_compiler_types(['ghc']), compile_and_run, [''])
test('conc036', only_compiler_types(['ghc']), compile_and_run, [''])
test('conc037', only_ways(['threaded']), compile_and_run, [''])
test('conc038', only_ways(['threaded']), compile_and_run, [''])
......
......@@ -39,7 +39,7 @@ test('ds031', normal, compile, [''])
test('ds032', normal, compile, [''])
test('ds033', normal, compile, [''])
test('ds034', normal, compile, [''])
test('ds035', normal, compile, [''])
test('ds035', only_compiler_types(['ghc']), compile, [''])
test('ds036', normal, compile, [''])
test('ds037', normal, compile, [''])
test('ds038', normal, compile, [''])
......
......@@ -19,4 +19,4 @@ test('drvrun013', normal, compile_and_run, [''])
test('drvrun014', normal, compile_and_run, [''])
test('drvrun015', normal, compile_and_run, [''])
test('drvrun016', normal, compile_and_run, ['-funbox-strict-fields'])
test('drvrun017', normal, compile_and_run, [''])
test('drvrun017', only_compiler_types(['ghc']), compile_and_run, [''])
test('net001', normal, compile_and_run, ['-package network'])
test('net001', only_compiler_types(['ghc']), compile_and_run, ['-package network'])
test('net002', extra_run_opts('3'), compile_and_run, ['-package network'])
test('uri001', normal, compile_and_run, ['-package network -package HUnit'])
......@@ -3,5 +3,5 @@ setTestOpts(only_ways(['normal']));
test('mdo001', normal, compile_and_run, [''])
test('mdo002', normal, compile_and_run, [''])
test('mdo003', normal, compile_and_run, [''])
test('mdo004', normal, compile_and_run, [''])
test('mdo004', only_compiler_types(['ghc']), compile_and_run, [''])
test('mdo005', normal, compile_and_run, [''])
......@@ -22,11 +22,11 @@ test('arith011', normal, compile_and_run, [''])
test('arith012', expect_fail_for(['optasm']), compile_and_run, [''])
test('arith013', normal, compile_and_run, [''])
test('arith013', only_compiler_types(['ghc']), compile_and_run, [''])
test('arith014', normal, compile_and_run, [''])
test('arith015', normal, compile_and_run, [''])
test('num009', normal, compile_and_run, [''])
test('num010', normal, compile_and_run, [''])
test('num011', normal, compile_and_run, [''])
test('arith016', normal, compile_and_run, ['-fglasgow-exts'])
test('arith016', only_compiler_types(['ghc']), compile_and_run, ['-fglasgow-exts'])
test('arith017', normal, compile_and_run, [''])
test('rename.prog005', normal, multimod_compile, \
test('rename.prog005', only_compiler_types(['ghc']), multimod_compile, \
['View', '-v0'])
clean(['VersionGraphClient.hi', 'VersionGraphClient.o', 'ViewType.hi', 'ViewType.o', 'View.hi', 'View.o'])
......@@ -3,12 +3,12 @@
test('rn003', normal, compile, [''])
test('rn005', normal, compile, [''])
test('rn006', normal, compile, [''])
test('rn009', normal, compile, [''])
test('rn010', normal, compile, [''])
test('rn011', normal, compile, [''])
test('rn012', normal, compile, [''])
test('rn009', only_compiler_types(['ghc']), compile, [''])
test('rn010', only_compiler_types(['ghc']), compile, [''])
test('rn011', only_compiler_types(['ghc']), compile, [''])
test('rn012', only_compiler_types(['ghc']), compile, [''])
test('rn013', normal, compile, [''])
test('rn017', normal, compile, [''])
test('rn017', only_compiler_types(['ghc']), compile, [''])
test('rn019', normal, compile, [''])
test('rn020', normal, compile, [''])
test('rn022', normal, compile, [''])
......
test('simpl001', normal, compile, [''])
test('simpl002', normal, compile, [''])
test('simpl003', normal, compile, [''])
test('simpl004', normal, compile, [''])
test('simpl004', only_compiler_types(['ghc']), compile, [''])
test('simpl005', normal, compile, [''])
# Missing:
# test('simpl006', normal, compile, [''])
test('simpl007', normal, compile, [''])
test('simpl008', normal, compile_fail, [''])
test('simpl008', only_compiler_types(['ghc']), compile_fail, [''])
test('simpl009', normal, compile, [''])
test('simpl010', normal, compile, [''])
......@@ -85,7 +85,7 @@ test('tc080', normal, compile, [''])
test('tc081', normal, compile, [''])
test('tc082', normal, compile, [''])
test('tc084', normal, compile, [''])
test('tc085', normal, compile, [''])
test('tc085', only_compiler_types(['ghc']), compile, [''])
test('tc086', normal, compile, [''])
test('tc087', normal, compile, ['-fglasgow-exts'])
test('tc088', normal, compile, [''])
......@@ -133,8 +133,8 @@ test('tc130', normal, compile, [''])
test('tc131', normal, compile, [''])
test('tc132', normal, compile, [''])
test('tc133', normal, compile, [''])
test('tc134', normal, compile, [''])
test('tc135', normal, compile, [''])
test('tc134', only_compiler_types(['ghc']), compile, [''])
test('tc135', only_compiler_types(['ghc']), compile, [''])
test('tc136', normal, compile, [''])
test('tc137', normal, compile, [''])
test('tc140', normal, compile, [''])
......@@ -145,26 +145,26 @@ test('tc144', normal, compile, [''])
test('tc145', normal, compile, [''])
test('tc146', normal, compile, [''])
test('tc147', normal, compile, [''])
test('tc148', normal, compile, [''])
test('tc149', normal, compile, [''])
test('tc148', only_compiler_types(['ghc']), compile, [''])
test('tc149', only_compiler_types(['ghc']), compile, [''])
test('tc150', normal, compile, [''])
test('tc151', normal, compile, [''])
test('tc152', normal, compile, [''])
test('tc152', only_compiler_types(['ghc']), compile, [''])
test('tc153', normal, compile, [''])
test('tc154', normal, compile, [''])
test('tc155', normal, compile, [''])
test('tc156', normal, compile, [''])
test('tc156', only_compiler_types(['ghc']), compile, [''])
test('tc157', normal, compile, [''])
test('tc158', normal, compile, [''])
test('tc158', only_compiler_types(['ghc']), compile, [''])
test('tc159', normal, compile, [''])
test('tc160', normal, compile, [''])
test('tc160', only_compiler_types(['ghc']), compile, [''])
test('tc161', normal, compile, [''])
test('tc162', normal, compile_fail, [''])
test('tc163', normal, compile, [''])
test('tc162', only_compiler_types(['ghc']), compile_fail, [''])
test('tc163', only_compiler_types(['ghc']), compile, [''])
test('tc164', normal, compile, [''])
test('tc165', normal, compile, [''])
test('tc166', normal, compile, [''])
test('tc167', normal, compile, [''])
test('tc166', only_compiler_types(['ghc']), compile, [''])
test('tc167', only_compiler_types(['ghc']), compile, [''])
test('tc168', normal, compile, ['-ddump-types'])
test('tc169', normal, compile, [''])
......@@ -183,7 +183,7 @@ test('tc172', normal, compile, [''])
test('tc173', normal, run_command_ignore_output, ['$MAKE tc173'])
clean(['Tc173a.hi', 'Tc173a.o', 'Tc173b.hi', 'Tc173b.o'])
test('tc174', normal, compile, [''])
test('tc174', only_compiler_types(['ghc']), compile, [''])
test('tc175', expect_fail_if_compiler_type('ghc'), compile, [''])
test('tc176', normal, compile, [''])
test('tc177', normal, compile, [''])
......
......@@ -55,32 +55,32 @@ test('tcfail062', normal, compile_fail, [''])
test('tcfail063', normal, compile_fail, [''])
test('tcfail065', normal, compile_fail, [''])
test('tcfail067', normal, compile_fail, [''])
test('tcfail068', normal, compile_fail, ['-fglasgow-exts'])
test('tcfail068', only_compiler_types(['ghc']), compile_fail, ['-fglasgow-exts'])
test('tcfail069', normal, compile_fail, [''])
test('tcfail070', normal, compile_fail, [''])
test('tcfail071', normal, compile_fail, [''])
test('tcfail072', normal, compile_fail, [''])
test('tcfail073', normal, compile_fail, [''])
test('tcfail075', normal, compile_fail, [''])
test('tcfail075', only_compiler_types(['ghc']), compile_fail, [''])
test('tcfail076', normal, compile_fail, [''])
test('tcfail077', normal, compile_fail, [''])
test('tcfail078', normal, compile_fail, [''])
test('tcfail079', normal, compile_fail, [''])
test('tcfail079', only_compiler_types(['ghc']), compile_fail, [''])
test('tcfail080', expect_fail_if_compiler_type('ghc'), compile_fail, ['-fglasgow-exts'])
test('tcfail082', normal, compile_fail, [''])
test('tcfail083', normal, compile_fail, [''])
test('tcfail084', normal, compile_fail, [''])
test('tcfail085', normal, compile_fail, [''])
test('tcfail086', normal, compile_fail, [''])
test('tcfail087', normal, compile_fail, [''])
test('tcfail087', only_compiler_types(['ghc']), compile_fail, [''])
test('tcfail088', normal, compile_fail, [''])
test('tcfail089', normal, compile_fail, [''])
test('tcfail090', normal, compile_fail, [''])
test('tcfail090', only_compiler_types(['ghc']), compile_fail, [''])
test('tcfail091', normal, compile_fail, [''])
test('tcfail092', normal, compile_fail, [''])
test('tcfail093', normal, compile_fail, [''])
test('tcfail094', normal, compile_fail, [''])
test('tcfail095', normal, compile_fail, [''])
test('tcfail095', only_compiler_types(['ghc']), compile_fail, [''])
test('tcfail096', normal, compile_fail, [''])
test('tcfail097', normal, compile_fail, [''])
test('tcfail098', normal, compile_fail, [''])
......@@ -88,8 +88,8 @@ test('tcfail099', normal, compile_fail, [''])
test('tcfail100', normal, compile_fail, [''])
test('tcfail101', normal, compile_fail, [''])
test('tcfail102', normal, compile_fail, [''])
test('tcfail103', normal, compile_fail, [''])
test('tcfail104', normal, compile_fail, [''])
test('tcfail103', only_compiler_types(['ghc']), compile_fail, [''])
test('tcfail104', only_compiler_types(['ghc']), compile_fail, [''])
test('tcfail105', normal, compile_fail, [''])
test('tcfail106', normal, compile_fail, [''])
test('tcfail107', normal, compile_fail, [''])
......@@ -100,16 +100,16 @@ test('tcfail111', normal, compile_fail, [''])
test('tcfail112', normal, compile_fail, [''])
test('tcfail113', normal, compile_fail, [''])
test('tcfail114', normal, compile_fail, [''])
test('tcfail115', normal, compile_fail, [''])
test('tcfail115', only_compiler_types(['ghc']), compile_fail, [''])
test('tcfail116', normal, compile_fail, [''])
test('tcfail117', normal, compile_fail, [''])
test('tcfail118', normal, compile_fail, [''])
test('tcfail119', normal, compile_fail, [''])
test('tcfail120', normal, compile_fail, ['-farrows'])
test('tcfail120', only_compiler_types(['ghc']), compile_fail, ['-farrows'])
test('tcfail121', normal, compile_fail, [''])
test('tcfail122', normal, compile_fail, [''])
test('tcfail123', normal, compile_fail, [''])
test('tcfail124', normal, compile_fail, [''])
test('tcfail122', only_compiler_types(['ghc']), compile_fail, [''])
test('tcfail123', only_compiler_types(['ghc']), compile_fail, [''])
test('tcfail124', only_compiler_types(['ghc']), compile_fail, [''])
test('tcfail125', normal, compile_fail, [''])
test('tcfail126', normal, compile_fail, [''])
test('tcfail127', normal, compile_fail, [''])
......@@ -4,12 +4,12 @@
# expected process return value, if not zero
test('tcrun001', normal, compile_and_run, [''])
test('tcrun002', normal, compile_and_run, [''])
test('tcrun002', only_compiler_types(['ghc']), compile_and_run, [''])
test('tcrun003', normal, compile_and_run, ['-fglasgow-exts'])
test('tcrun004', normal, compile_and_run, ['-fglasgow-exts'])
test('tcrun005', normal, compile_and_run, [''])
test('tcrun006', normal, compile_and_run, [''])
test('tcrun007', normal, compile_and_run, [''])
test('tcrun007', only_compiler_types(['ghc']), compile_and_run, [''])
test('tcrun008', normal, compile_and_run, [''])
test('tcrun009', normal, compile_and_run, [''])
test('tcrun010', normal, compile_and_run, [''])
......@@ -25,7 +25,7 @@ test('tcrun019', normal, compile_and_run, [''])
test('tcrun020', normal, compile_and_run, [''])
# Doesn't work with External Core due to datatype with no constructors
test('tcrun021', expect_fail_for(['extcore','optextcore']), compile_and_run, [''])
test('tcrun022', normal, compile_and_run, ['-O -fglasgow-exts'])
test('tcrun022', only_compiler_types(['ghc']), compile_and_run, ['-O -fglasgow-exts'])
test('tcrun023', normal, compile_and_run, ['-O'])
test('tcrun024', normal, compile_and_run, ['-O'])
test('tcrun025', normal, multimod_compile_and_run, ['tcrun025',''])
......@@ -36,5 +36,5 @@ test('tcrun027', normal, compile_and_run, [''])
test('tcrun028', expect_fail_for(['extcore','optextcore']), compile_and_run, [''])
test('tcrun029', normal, compile_and_run, [''])
test('tcrun030', normal, compile_and_run, [''])
test('tcrun031', normal, compile_and_run, [''])
test('tcrun031', only_compiler_types(['ghc']), compile_and_run, [''])
test('church', normal, compile_and_run, [''])
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