all.T 11.8 KB
Newer Older
1
# Args to vtc are: extra compile flags
2

3
4
def f( opts ):
  opts.extra_hc_opts = '-fno-warn-incomplete-patterns'
5

6
setTestOpts(f)
7

8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
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
test('tc001', normal, compile, [''])
test('tc002', normal, compile, [''])
test('tc003', normal, compile, [''])
test('tc004', normal, compile, [''])
test('tc005', normal, compile, [''])
test('tc006', normal, compile, [''])
test('tc007', normal, compile, [''])
test('tc008', normal, compile, [''])
test('tc009', normal, compile, [''])
test('tc010', normal, compile, [''])
test('tc011', normal, compile, [''])
test('tc012', normal, compile, [''])
test('tc013', normal, compile, [''])
test('tc014', normal, compile, [''])
test('tc015', normal, compile, [''])
test('tc016', normal, compile, [''])
test('tc017', normal, compile, [''])
test('tc018', normal, compile, [''])
test('tc019', normal, compile, ['-fglasgow-exts'])
test('tc020', normal, compile, [''])
test('tc021', normal, compile, [''])
test('tc022', normal, compile, [''])
test('tc023', normal, compile, [''])
test('tc024', normal, compile, [''])
test('tc025', normal, compile, [''])
test('tc026', normal, compile, [''])
test('tc027', normal, compile, [''])
test('tc028', normal, compile, [''])
test('tc029', normal, compile, [''])
test('tc030', normal, compile, [''])
test('tc031', normal, compile, [''])
test('tc032', normal, compile, [''])
test('tc033', normal, compile, [''])
test('tc034', normal, compile, [''])
test('tc035', normal, compile, [''])
test('tc036', normal, compile, [''])
test('tc037', normal, compile, [''])
test('tc038', normal, compile, [''])
test('tc039', normal, compile, [''])
test('tc040', normal, compile, [''])
test('tc041', normal, compile, [''])
test('tc042', normal, compile, [''])
test('tc043', normal, compile, [''])
test('tc044', normal, compile, [''])
test('tc045', normal, compile, [''])
test('tc046', normal, compile, [''])
test('tc047', normal, compile, [''])
test('tc048', normal, compile, [''])
test('tc049', normal, compile, [''])
test('tc050', normal, compile, [''])
test('tc051', normal, compile, [''])
test('tc052', normal, compile, [''])
test('tc053', normal, compile, [''])
test('tc054', normal, compile, [''])
test('tc055', normal, compile, [''])
test('tc056', normal, compile, [''])
test('tc057', normal, compile, [''])
test('tc058', normal, compile, [''])
test('tc059', normal, compile, [''])
test('tc060', normal, compile, [''])
test('tc061', normal, compile, [''])
test('tc062', normal, compile, [''])
test('tc063', normal, compile, [''])
test('tc064', normal, compile, [''])
72
test('tc065', normal, compile, [''])
73
74
75
76
77
78
79
80
81
82
83
84
85
86
test('tc066', normal, compile, [''])
test('tc067', normal, compile, [''])
test('tc068', normal, compile, [''])
test('tc069', normal, compile, [''])
test('tc070', normal, compile, [''])
test('tc073', normal, compile, [''])
test('tc074', normal, compile, [''])
test('tc076', normal, compile, [''])
test('tc077', normal, compile, [''])
test('tc078', normal, compile, [''])
test('tc079', normal, compile, [''])
test('tc080', normal, compile, [''])
test('tc081', normal, compile, [''])
test('tc082', normal, compile, [''])
87
test('tc084', if_compiler_type('hugs', expect_fail), compile, [''])
ross's avatar
ross committed
88
test('tc085', only_compiler_types(['ghc']), compile, [''])
89
90
test('tc086', normal, compile, [''])
test('tc087', normal, compile, ['-fglasgow-exts'])
91
test('tc088', normal, compile, [''])
92
93
94
95
96
97
98
test('tc089', normal, compile, [''])
test('tc090', normal, compile, [''])
test('tc091', normal, compile, [''])
test('tc092', normal, compile, [''])
test('tc093', normal, compile, [''])
test('tc094', normal, compile, [''])
test('tc095', normal, compile, [''])
99
test('tc096', if_compiler_type('hugs', expect_fail), compile, [''])
100
101
102
103
104
105
test('tc097', normal, compile, ['-fglasgow-exts'])
test('tc098', normal, compile, [''])
test('tc099', normal, compile, [''])
test('tc100', normal, compile, [''])
test('tc101', normal, compile, [''])
test('tc102', normal, compile, [''])
106
# tc103 free
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
test('tc104', normal, compile, [''])
test('tc105', normal, compile, [''])
test('tc106', normal, compile, [''])
test('tc107', normal, compile, [''])
test('tc108', normal, compile, ['-fglasgow-exts'])
test('tc109', normal, compile, [''])
test('tc111', normal, compile, [''])
test('tc112', normal, compile, [''])
test('tc113', normal, compile, [''])
test('tc114', normal, compile, [''])
test('tc115', normal, compile, [''])
test('tc116', normal, compile, [''])
test('tc117', normal, compile, [''])
test('tc118', normal, compile, [''])
test('tc119', normal, compile, [''])
test('tc120', normal, compile, [''])
test('tc121', normal, compile, [''])
test('tc122', normal, compile, [''])
test('tc123', normal, compile, [''])
test('tc124', normal, compile, [''])
test('tc125', normal, compile, [''])
test('tc126', normal, compile, [''])
test('tc127', normal, compile, [''])
test('tc128', normal, compile, [''])
test('tc129', normal, compile, [''])
test('tc130', normal, compile, [''])
test('tc131', normal, compile, [''])
134
test('tc132', normal, compile, [''])
135
test('tc133', normal, compile, [''])
136
137
138
139

# tc134 tested result type signatures, which aren't supported any more
# test('tc134', only_compiler_types(['ghc']), compile_fail, [''])

ross's avatar
ross committed
140
test('tc135', only_compiler_types(['ghc']), compile, [''])
141
142
143
test('tc136', normal, compile, [''])
test('tc137', normal, compile, [''])
test('tc140', normal, compile, [''])
144
test('tc141', normal, compile_fail, [''])
145
146
test('tc142', normal, compile, [''])
test('tc143', normal, compile, [''])
ross's avatar
ross committed
147
test('tc144', omit_compiler_types(['hugs']), compile, [''])	# Hugs loops
148
149
150
test('tc145', normal, compile, [''])
test('tc146', normal, compile, [''])
test('tc147', normal, compile, [''])
ross's avatar
ross committed
151
152
test('tc148', only_compiler_types(['ghc']), compile, [''])
test('tc149', only_compiler_types(['ghc']), compile, [''])
simonpj's avatar
simonpj committed
153
test('tc150', expect_broken(4295), compile, [''])
154
test('tc151', normal, compile, [''])
ross's avatar
ross committed
155
test('tc152', only_compiler_types(['ghc']), compile, [''])
156
157
158
test('tc153', normal, compile, [''])
test('tc154', normal, compile, [''])
test('tc155', normal, compile, [''])
ross's avatar
ross committed
159
test('tc156', only_compiler_types(['ghc']), compile, [''])
160
test('tc157', normal, compile, [''])
ross's avatar
ross committed
161
test('tc158', only_compiler_types(['ghc']), compile, [''])
162
test('tc159', normal, compile_and_run, [''])
ross's avatar
ross committed
163
test('tc160', only_compiler_types(['ghc']), compile, [''])
164
test('tc161', normal, compile, [''])
ross's avatar
ross committed
165
166
test('tc162', only_compiler_types(['ghc']), compile_fail, [''])
test('tc163', only_compiler_types(['ghc']), compile, [''])
167
test('tc164', normal, compile, [''])
168
test('tc165', normal, compile, [''])
ross's avatar
ross committed
169
170
test('tc166', only_compiler_types(['ghc']), compile, [''])
test('tc167', only_compiler_types(['ghc']), compile, [''])
ross's avatar
ross committed
171
test('tc168', only_compiler_types(['ghc']), compile, ['-ddump-types'])
172
test('tc169', normal, compile, [''])
173

Ian Lynagh's avatar
Ian Lynagh committed
174
test('tc170',
175
176
177
     extra_clean(['Tc170_Aux.hi', 'Tc170_Aux.o']),
     run_command,
     ['$MAKE -s --no-print-directory tc170'])
178

179
test('tc171', normal, compile, [''])
180
test('tc172', normal, compile, [''])
181
182

# The point about this test is that it compiles Tc173a and Tc173b *separately*
Ian Lynagh's avatar
Ian Lynagh committed
183
184
185
186
test('tc173',
     extra_clean(['Tc173a.hi', 'Tc173a.o', 'Tc173b.hi', 'Tc173b.o']),
     run_command,
     ['$MAKE -s --no-print-directory tc173'])
187

ross's avatar
ross committed
188
test('tc174', only_compiler_types(['ghc']), compile, [''])
Ian Lynagh's avatar
Ian Lynagh committed
189
test('tc175', normal, compile, [''])
simonpj's avatar
simonpj committed
190
test('tc176', normal, compile, [''])
191
test('tc177', normal, compile, [''])
192
193
test('tc178', normal, compile, [''])
test('tc179', normal, compile, [''])
194
test('tc180', normal, compile, [''])
195
test('tc181', normal, compile, [''])
196
test('tc182', normal, compile, [''])
Ian Lynagh's avatar
Ian Lynagh committed
197
test('tc183', reqlib('mtl'), compile, [''])
198
test('tc184', normal, compile, [''])
ross's avatar
ross committed
199
test('tc185', only_compiler_types(['ghc']), compile, [''])
200
test('tc186', normal, compile, [''])
201
test('tc187', normal, compile, [''])
ross's avatar
ross committed
202
test('tc188', only_compiler_types(['ghc']), compile, [''])
203
test('tc189', normal, compile, [''])
ross's avatar
ross committed
204
test('tc190', only_compiler_types(['ghc']), compile, [''])
Ian Lynagh's avatar
Ian Lynagh committed
205
test('tc191', [only_compiler_types(['ghc']), reqlib('syb')], compile, [''])
ross's avatar
ross committed
206
test('tc192', only_compiler_types(['ghc']), compile, [''])
207
test('tc193', only_compiler_types(['ghc']), compile, [''])
simonpj's avatar
simonpj committed
208
test('tc194', expect_broken(4295), compile, [''])
209
test('tc195', only_compiler_types(['ghc']), compile, [''])
210
test('tc196', normal, compile, [''])
211
test('tc197', normal, compile, [''])
212
test('tc198', normal, compile, [''])
213
test('tc199', normal, compile, [''])
214
test('tc200', normal, compile, [''])
simonpj's avatar
simonpj committed
215
test('tc201', normal, compile, [''])
simonpj's avatar
simonpj committed
216
test('tc202', normal, compile, [''])
simonpj's avatar
simonpj committed
217
test('tc203', normal, compile, [''])
simonpj's avatar
simonpj committed
218
test('tc204', normal, compile, [''])
219
test('tc205', normal, compile, [''])
simonpj's avatar
simonpj committed
220
test('tc206', normal, compile, [''])
221
test('tc207', normal, compile, [''])
222
test('tc208', normal, compile, [''])
simonpj's avatar
simonpj committed
223
test('tc209', normal, compile, [''])
simonpj's avatar
simonpj committed
224
test('tc210', normal, compile, [''])
simonpj's avatar
simonpj committed
225
test('tc211', if_compiler_lt('ghc', '6.11', expect_fail), compile_fail, [''])
simonpj's avatar
simonpj committed
226
test('tc212', normal, compile, [''])
simonpj's avatar
simonpj committed
227
test('tc213', normal, compile, [''])
228
test('tc214', if_compiler_lt('ghc', '6.11', expect_fail), compile, [''])
229
test('tc215', normal, compile, [''])
230
test('tc216', normal, compile, [''])
Ian Lynagh's avatar
Ian Lynagh committed
231
test('tc217', reqlib('mtl'), compile, [''])
232
233
test('tc218', normal, compile, [''])
test('tc219', normal, compile, [''])
Ian Lynagh's avatar
Ian Lynagh committed
234
test('tc220', [reqlib('mtl'), reqlib('syb')], compile, [''])
235
test('tc221', normal, compile, [''])
simonpj's avatar
simonpj committed
236
test('tc222', normal, compile, [''])
Ian Lynagh's avatar
Ian Lynagh committed
237
test('tc223', reqlib('mtl'), compile, [''])
238
test('tc224', normal, compile, [''])
simonpj's avatar
simonpj committed
239
test('tc225', normal, compile, [''])
simonpj's avatar
simonpj committed
240
test('tc226', normal, compile, [''])
simonpj's avatar
simonpj committed
241
test('tc227', normal, compile, [''])
simonpj's avatar
simonpj committed
242
test('tc228', normal, compile, [''])
Ian Lynagh's avatar
Ian Lynagh committed
243
test('tc229', normal, compile, [''])
simonpj's avatar
simonpj committed
244
test('tc230', normal, compile, [''])
simonpj's avatar
simonpj committed
245
test('tc231', normal, compile, [''])
Ian Lynagh's avatar
Ian Lynagh committed
246
test('tc232', reqlib('mtl'), compile, [''])
247
test('tc233', normal, compile, [''])
248
test('tc234', normal, compile, [''])
simonpj's avatar
simonpj committed
249
test('tc235', normal, compile, [''])
250
test('tc236', normal, compile, [''])
251
test('tc237', normal, compile, [''])
252
test('tc238', normal, compile, [''])
253

simonpj's avatar
simonpj committed
254
255
test('tc239', extra_clean(['Tc239_Help.hi', 'Tc239_Help.o']), 
     multimod_compile, ['tc239', '-v0'])
256
     
257
test('tc240', normal, compile, [''])
simonpj's avatar
simonpj committed
258
259
test('tc241', normal, compile, [''])
test('tc242', normal, compile, [''])
Ian Lynagh's avatar
Ian Lynagh committed
260
test('tc243', normal, compile, [''])
261
test('tc244', if_compiler_lt('ghc', '6.11', expect_fail), compile, [''])
Ian Lynagh's avatar
Ian Lynagh committed
262
test('tc245',
263
264
     [extra_clean(['Tc245_A.hi', 'Tc245_A.o', 'tc245.hi', 'tc245.o']),
      if_compiler_lt('ghc', '6.11', expect_fail)],
Ian Lynagh's avatar
Ian Lynagh committed
265
266
     run_command,
     ['$MAKE -s --no-print-directory tc245'])
Ian Lynagh's avatar
Ian Lynagh committed
267
test('tc246', normal, compile, [''])
simonpj's avatar
simonpj committed
268
test('tc247', normal, compile, [''])
simonpj's avatar
simonpj committed
269
test('tc248', normal, compile, [''])
simonpj's avatar
simonpj committed
270

271
test('FD1', normal, compile_fail, [''])
272
273
274
275
test('FD2', normal, compile_fail, [''])
test('FD3', normal, compile_fail, [''])
test('FD4', normal, compile, [''])

276
test('faxen', normal, compile, [''])
simonpj's avatar
simonpj committed
277
test('T1495', normal, compile, [''])
simonpj's avatar
simonpj committed
278
test('T2045', normal, compile, [''])   # Needs -fhpc
simonpj's avatar
simonpj committed
279
test('T2478', normal, compile, ['']) 
simonpj's avatar
simonpj committed
280
281
test('T2433', extra_clean(['T2433_Help.hi', 'T2433_Help.o']), 
     multimod_compile, ['T2433', '-v0'])
simonpj's avatar
simonpj committed
282
283
test('T2494', normal, compile_fail, ['']) 
test('T2494-2', normal, compile, ['']) 
284
test('T2497', normal, compile, ['']) 
simonpj's avatar
simonpj committed
285
     
286

287
# Omitting temporarily
simonpj's avatar
simonpj committed
288
289
test('syn-perf', normal, compile, ['-fcontext-stack=30'])
test('syn-perf2', normal, compile, [''])
290

291
292
293
test('LoopOfTheDay1', normal, compile, [''])
test('LoopOfTheDay2', normal, compile, [''])
test('LoopOfTheDay3', normal, compile, [''])
Ian Lynagh's avatar
Ian Lynagh committed
294

Ian Lynagh's avatar
Ian Lynagh committed
295
test('T1470', normal, compile, [''])
simonpj's avatar
simonpj committed
296
test('T2572', normal, compile, [''])
simonpj's avatar
simonpj committed
297
test('T2573', normal, compile, [''])
simonpj's avatar
simonpj committed
298
test('T2735', normal, compile, [''])
simonpj's avatar
simonpj committed
299
test('T2799', normal, compile, [''])
simonpj's avatar
simonpj committed
300
test('T3219', normal, compile, [''])
simonpj's avatar
simonpj committed
301
test('T3342', normal, compile, [''])
simonpj's avatar
simonpj committed
302
test('T3346', normal, compile, [''])
Simon Marlow's avatar
Simon Marlow committed
303
304
305
# This is a TH test, which would require extra magic to make it work with
# profiling (see th/all.T).
test('T3391', omit_ways(['profc','profasm']), compile, [''])
simonpj's avatar
simonpj committed
306
test('T3409', normal, compile, [''])
simonpj's avatar
simonpj committed
307
test('T3955', normal, compile, [''])
simonpj's avatar
simonpj committed
308
test('PolyRec', normal, compile, [''])
simonpj's avatar
simonpj committed
309

Ian Lynagh's avatar
Ian Lynagh committed
310
311
312
313
314
315
316
test('T2412',
     extra_clean(['T2412.hi-boot', 'T2412.o-boot',
                  'T2412A.hi', 'T2412A.o',
                  'T2412.hi', 'T2412.o']),
     run_command,
     ['$MAKE --no-print-directory -s T2412'])

simonpj's avatar
simonpj committed
317