all.T 4.69 KB
Newer Older
1 2 3 4

test('readFloat', exit_code(1), compile_and_run, [''])
test('enumDouble', normal, compile_and_run, [''])
test('enumRatio', normal, compile_and_run, [''])
5 6
test('tempfiles', normal, compile_and_run, [''])
test('fixed', normal, compile_and_run, [''])
7
test('quotOverflow', normal, compile_and_run, [''])
8
test('assert', exit_code(1), compile_and_run, ['-fno-ignore-asserts'])
9
test('CPUTime001', normal, compile_and_run, [''])
10 11
test('readLitChar',   normal, compile_and_run, [''])
test('unicode001',
ian@well-typed.com's avatar
ian@well-typed.com committed
12
     when(platform('i386-unknown-openbsd'), expect_fail),
13 14 15
     compile_and_run,
     [''])
test('unicode002',
ian@well-typed.com's avatar
ian@well-typed.com committed
16
     when(platform('i386-unknown-openbsd'), expect_fail),
17 18
     compile_and_run,
     [''])
19
test('data-fixed-show-read', normal, compile_and_run, [''])
20
test('showDouble', normal, compile_and_run, [''])
Ian Lynagh's avatar
Ian Lynagh committed
21
test('readDouble001', normal, compile_and_run, [''])
Ian Lynagh's avatar
Ian Lynagh committed
22
test('readInteger001', normal, compile_and_run, [''])
23
test('readFixed001', normal, compile_and_run, [''])
24
test('lex001', normal, compile_and_run, [''])
25 26
test('take001', extra_run_opts('1'), compile_and_run, [''])
test('genericNegative001', extra_run_opts('-1'), compile_and_run, [''])
Ian Lynagh's avatar
Ian Lynagh committed
27
test('ix001', normal, compile_and_run, [''])
28

Ian Lynagh's avatar
Ian Lynagh committed
29 30 31 32 33 34
# need to add -K64m to the compiler opts, so that GHCi gets it too
test('ioref001',
     [skip_if_fast,extra_run_opts('+RTS -K64m -RTS')],
     compile_and_run,
     ['+RTS -K64m -RTS'])

35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116
test('echo001', set_stdin("echo001.hs"), compile_and_run, [''])

test('hTell001', normal, compile_and_run, [''])

test('hTell002', normal, compile_and_run, [''])

test('performGC001', normal, compile_and_run, [''])

# optimisation screws up this test because some of the traces get commoned up
test('trace001', normal, compile_and_run, [''])

test('hGetBuf002', normal, compile_and_run, [''])
test('hGetBuf003', normal, compile_and_run, [''])
test('hPutBuf001', normal, compile_and_run, [''])
test('hPutBuf002', extra_clean(['hPutBuf002.out']), compile_and_run, [''])

test('char001', 	normal, compile_and_run, [''])
test('char002', 	normal, compile_and_run, [''])

test('cstring001', 	normal, compile_and_run, [''])

test('length001',
     # This fails without -O, as it relies on a RULE being applied
     expect_fail_for(['normal', 'threaded1', 'llvm']),
     compile_and_run,
     [''])

test('ratio001', 	normal, compile_and_run, [''])

test('rand001',		reqlib('random'), compile_and_run, [''])
test('reads001',		normal, compile_and_run, [''])
test('show001',		normal, compile_and_run, [''])
test('text001',		normal, compile_and_run, [''])

test('tup001',		normal, compile_and_run, [''])

test('addr001',		normal, compile_and_run, [''])
test('dynamic001',      normal, compile_and_run, [''])
test('dynamic002',      normal, compile_and_run, [''])
test('dynamic003',      extra_run_opts('+RTS -K32m -RTS'), compile_and_run, [''])
test('dynamic004',      normal, compile_and_run, [''])
test('dynamic005',      normal, compile_and_run, [''])
test('enum01',          skip_if_fast, compile_and_run, ['-cpp'])
test('enum02', 		skip_if_fast, compile_and_run, ['-cpp'])
test('enum03', 		skip_if_fast, compile_and_run, ['-cpp'])
test('enum04', 		normal, compile_and_run, [''])
test('exceptionsrun001', 	normal, compile_and_run, [''])
test('exceptionsrun002', 	normal, compile_and_run, [''])
test('list001'	,	skip_if_fast, compile_and_run, [''])
test('list002', skip_if_fast, compile_and_run, [''])
test('list003', skip_if_fast, compile_and_run, [''])

test('memo001',
     [skip_if_fast,
      extra_run_opts('+RTS -A10k -RTS'),
      extra_clean(['Memo1.hi', 'Memo1.o'])],
     multimod_compile_and_run,
     ['memo001',''])

test('memo002',
     [skip_if_fast,
      extra_run_opts('20'),
      extra_clean(['Memo2.hi', 'Memo2.o'])],
	multimod_compile_and_run, ['memo002',''])

test('packedstring001', reqlib('packedstring'), compile_and_run, ['-package packedstring'])

test('stableptr001',
     [skip_if_fast, extra_run_opts('+RTS -K8m -RTS')],
     compile_and_run, [''])
test('stableptr003', normal, compile_and_run, [''])
test('stableptr004', extra_run_opts('+RTS -K4m -RTS'), compile_and_run, [''])
test('stableptr005', normal, compile_and_run, [''])

test('weak001', normal, compile_and_run, [''])

# In the 65001 codepage, we can't even cat the expected output on msys:
#     $ cat 4006.stdout
#     It works here
#     cat: write error: Permission denied
# Seems to be a known problem, e.g.
#     http://mingw-users.1079350.n2.nabble.com/Bug-re-Unicode-on-the-console-td3121717.html
117
test('T4006', if_msys(expect_fail), compile_and_run, [''])
118

119
test('T5943', normal, compile_and_run, [''])
Simon Peyton Jones's avatar
Simon Peyton Jones committed
120
test('T5962', normal, compile_and_run, [''])
121
test('T7034', normal, compile_and_run, [''])
122

Simon Marlow's avatar
Simon Marlow committed
123 124
test('qsem001', normal, compile_and_run, [''])
test('qsemn001', normal, compile_and_run, [''])
Simon Marlow's avatar
Simon Marlow committed
125 126

test('T7457', normal, compile_and_run, [''])