all.T 15.2 KB
Newer Older
pcapriotti's avatar
pcapriotti committed
1
# coding=utf8
2

3 4 5 6 7 8 9
# Note [Disabling ghci-leak-check]
# ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
# The -fno-ghci-leak-check is because this test prints the current GHC settings
# and the ghci-leak-check is turned off in DEBUG mode. See #15372. So we need to
# turn it off in non-DEBUG mode, too, so that one stdout works for both modes.
# After #15372 is fully fixed, these "extra_hc_opts" should be removed.

pcapriotti's avatar
pcapriotti committed
10 11 12
test('ghci001', combined_output, ghci_script, ['ghci001.script'])
test('ghci002', combined_output, ghci_script, ['ghci002.script'])
test('ghci003', combined_output, ghci_script, ['ghci003.script'])
13
test('ghci004', [ combined_output,
14 15
		  when(arch('powerpc64') or arch('powerpc64le'),
                       expect_broken_for(11259,['ghci-ext'])),
16 17
                  unless(opsys('mingw32'),extra_ways(['ghci-ext'])) ],
                ghci_script, ['ghci004.script'])
pcapriotti's avatar
pcapriotti committed
18
test('ghci005', combined_output, ghci_script, ['ghci005.script'])
19
test('ghci006', [ combined_output,
20 21
                  when(arch('powerpc64') or arch('powerpc64le'),
                       expect_broken_for(11259,['ghci-ext'])),
22 23
                  unless(opsys('mingw32'),extra_ways(['ghci-ext'])) ],
                ghci_script, ['ghci006.script'])
pcapriotti's avatar
pcapriotti committed
24
test('ghci007', combined_output, ghci_script, ['ghci007.script'])
25 26
test('ghci008', [ combined_output,
                  normalise_version('base') ], ghci_script, ['ghci008.script'])
pcapriotti's avatar
pcapriotti committed
27
test('ghci009', combined_output, ghci_script, ['ghci009.script'])
28

29
# Skip this test: deadlock cannot be detected now, because we wait for
30 31 32 33
# signals to arrive if there are signal handlers installed, and GHCi
# has a ^C handler installed.
test('ghci010', skip, ghci_script, ['ghci010.script'])

34
test('ghci011', normal, ghci_script, ['ghci011.script'])
35
test('ghci012', normal, ghci_script, ['ghci012.script'])
36
test('ghci013', normal, ghci_script, ['ghci013.script'])
Ian Lynagh's avatar
Ian Lynagh committed
37
test('ghci014', reqlib('QuickCheck'), ghci_script, ['ghci014.script'])
38

39
# Ignore stderr from ghci015, the output is non-deterministic
40 41
# (has occasional "thread blocked indefinitely" exceptions), and this
# is part of the test.
42 43 44
# But don't silence both stderr and stdout, as then the test would trivially
# pass when ghci015.hs has errors.
test('ghci015', [reqlib('stm'), ignore_stderr], ghci_script, ['ghci015.script'])
45

Ian Lynagh's avatar
Ian Lynagh committed
46
test('ghci016', expect_broken(552), ghci_script, ['ghci016.script'])
47
test('ghci017', [reqlib('haskell98'), extra_run_opts('-hide-package haskell98')], ghci_script, ['ghci017.script'])
48
test('ghci018', normal, ghci_script, ['ghci018.script'])
Simon Peyton Jones's avatar
Simon Peyton Jones committed
49
test('ghci019', normal, ghci_script, ['ghci019.script'])
Ian Lynagh's avatar
Ian Lynagh committed
50
test('ghci020', normal, ghci_script, ['ghci020.script'])
Ian Lynagh's avatar
Ian Lynagh committed
51
test('ghci021', normal, ghci_script, ['ghci021.script'])
Simon Marlow's avatar
Simon Marlow committed
52
test('ghci022', normal, ghci_script, ['ghci022.script'])
Simon Marlow's avatar
Simon Marlow committed
53

54
test('ghci023', normal, ghci_script, ['ghci023.script'])
Ian Lynagh's avatar
Ian Lynagh committed
55
test('ghci024',
rwbarton's avatar
rwbarton committed
56
     [req_interp, when(fast(), skip)],
Ben Gamari's avatar
Ben Gamari committed
57
     makefile_test, [])
58
test('T9367',
rwbarton's avatar
rwbarton committed
59
     [req_interp, when(fast() or config.os != 'mingw32', skip)],
Ben Gamari's avatar
Ben Gamari committed
60
     makefile_test, [])
61 62
test('ghci025', extra_files(['Ghci025B.hs', 'Ghci025C.hs', 'Ghci025D.hs']), ghci_script, ['ghci025.script'])
test('ghci026', extra_files(['../prog002']), ghci_script, ['ghci026.script'])
63

64
test('ghci027', [], ghci_script, ['ghci027.script'])
Simon Marlow's avatar
Simon Marlow committed
65
test('ghci028', normal, ghci_script, ['ghci028.script'])
Ian Lynagh's avatar
Ian Lynagh committed
66
test('ghci029', normal, ghci_script, ['ghci029.script'])
67
test('ghci030', normal, ghci_script, ['ghci030.script'])
68
test('ghci031', normal, ghci_script, ['ghci031.script'])
69
test('ghci032', normal, ghci_script, ['ghci032.script'])
Simon Peyton Jones's avatar
Simon Peyton Jones committed
70
test('ghci033', normal, ghci_script, ['ghci033.script'])
71
test('ghci034', normal, ghci_script, ['ghci034.script'])
Ian Lynagh's avatar
Ian Lynagh committed
72
test('ghci035', normal, ghci_script, ['ghci035.script'])
SamAnklesaria's avatar
SamAnklesaria committed
73
test('ghci036', normal, ghci_script, ['ghci036.script'])
Ben Gamari's avatar
Ben Gamari committed
74
test('ghci037', req_interp, makefile_test, [])
75
test('ghci038', extra_files(['../shell.hs']), ghci_script, ['ghci038.script'])
76 77 78 79 80 81
test('ghci039', normal, ghci_script, ['ghci039.script'])
test('ghci040', normal, ghci_script, ['ghci040.script'])
test('ghci041', normal, ghci_script, ['ghci041.script'])
test('ghci042', normal, ghci_script, ['ghci042.script'])
test('ghci043', normal, ghci_script, ['ghci043.script'])
test('ghci044', normal, ghci_script, ['ghci044.script'])
82
test('ghci044a', normal, ghci_script, ['ghci044a.script'])
83 84 85 86 87 88 89 90 91 92
test('ghci045', normal, ghci_script, ['ghci045.script'])
test('ghci046', normal, ghci_script, ['ghci046.script'])
test('ghci047', normal, ghci_script, ['ghci047.script'])
test('ghci048', normal, ghci_script, ['ghci048.script'])
test('ghci049', normal, ghci_script, ['ghci049.script'])
test('ghci050', normal, ghci_script, ['ghci050.script'])
test('ghci051', normal, ghci_script, ['ghci051.script'])
test('ghci052', normal, ghci_script, ['ghci052.script'])
test('ghci053', normal, ghci_script, ['ghci053.script'])
test('ghci054', normal, ghci_script, ['ghci054.script'])
93
test('ghci055', combined_output, ghci_script, ['ghci055.script'])
94 95

test('ghci056',
96 97
     [pre_cmd('$MAKE -s --no-print-directory ghci056_setup'),
      extra_run_opts('ghci056_c.o')],
98 99
     ghci_script, ['ghci056.script'])

100 101 102
test('ghci057', extra_hc_opts("-fno-ghci-leak-check"), ghci_script, ['ghci057.script'])
  # See Note [Disabling ghci-leak-check]

niksaz's avatar
niksaz committed
103 104
test('ghci060', normal, ghci_script, ['ghci060.script'])
test('ghci061', normal, ghci_script, ['ghci061.script'])
105 106
test('ghci062', [extra_files(['ghci062/', 'ghci062/Test.hs']),
                 when(config.have_ext_interp, extra_ways(['ghci-ext']))],
107
		ghci_script, ['ghci062.script'])
108
test('ghci063', normal, ghci_script, ['ghci063.script'])
xldenis's avatar
xldenis committed
109
test('ghci064', normal, ghci_script, ['ghci064.script'])
110 111
test('T2452', [extra_hc_opts("-fno-implicit-import-qualified")],
    ghci_script, ['T2452.script'])
simonpj's avatar
simonpj committed
112
test('T2766', normal, ghci_script, ['T2766.script'])
Simon Marlow's avatar
Simon Marlow committed
113

114
test('T1914', [], ghci_script, ['T1914.script'])
Ian Lynagh's avatar
Ian Lynagh committed
115

116 117
test('T2182ghci', normal, ghci_script, ['T2182ghci.script'])
test('T2182ghci2', [extra_hc_opts("-XNoImplicitPrelude")], ghci_script, ['T2182ghci2.script'])
118
test('T2976', normal, ghci_script, ['T2976.script'])
119
test('T2816', normal, ghci_script, ['T2816.script'])
Ian Lynagh's avatar
Ian Lynagh committed
120
test('T789', normal, ghci_script, ['T789.script'])
Simon Peyton Jones's avatar
Simon Peyton Jones committed
121
test('T3263', normal, ghci_script, ['T3263.script'])
122
test('T4051', normal, ghci_script, ['T4051.script'])
Simon Peyton Jones's avatar
Simon Peyton Jones committed
123
test('T4087', normal, ghci_script, ['T4087.script'])
Simon Peyton Jones's avatar
Simon Peyton Jones committed
124
test('T4015', normal, ghci_script, ['T4015.script'])
Simon Peyton Jones's avatar
Simon Peyton Jones committed
125
test('T4127', normal, ghci_script, ['T4127.script'])
126
test('T4127a', normal, ghci_script, ['T4127a.script'])
127
test('T4316', normal, ghci_script, ['T4316.script'])
batterseapower's avatar
batterseapower committed
128
test('T4832', normal, ghci_script, ['T4832.script'])
simonpj's avatar
simonpj committed
129
test('T5045', normal, ghci_script, ['T5045.script'])
Simon Peyton Jones's avatar
Simon Peyton Jones committed
130
test('T5130', normal, ghci_script, ['T5130.script'])
Simon Peyton Jones's avatar
Simon Peyton Jones committed
131
test('T5417', normal, ghci_script, ['T5417.script'])
Simon Marlow's avatar
Simon Marlow committed
132
test('T5545', normal, ghci_script, ['T5545.script'])
pcapriotti's avatar
pcapriotti committed
133
test('T5557', combined_output, ghci_script, ['T5557.script'])
Simon Peyton Jones's avatar
Simon Peyton Jones committed
134
test('T5566', normal, ghci_script, ['T5566.script'])
135
test('GhciKinds', normal, ghci_script, ['GhciKinds.script'])
Simon Marlow's avatar
Simon Marlow committed
136
test('T5564', normal, ghci_script, ['T5564.script'])
137
test('Defer02', extra_files(['../../typecheck/should_run/Defer01.hs']), ghci_script, ['Defer02.script'])
Simon Peyton Jones's avatar
Simon Peyton Jones committed
138
test('T5820', normal, ghci_script, ['T5820.script'])
139
test('T5836', normal, ghci_script, ['T5836.script'])
140 141 142
test('T5979',
    [reqlib('transformers'),
     normalise_slashes,
143
     normalise_version("transformers")],
144
    ghci_script, ['T5979.script'])
145 146
test('T5975a', [pre_cmd('touch föøbàr1.hs')], ghci_script, ['T5975a.script'])
test('T5975b', [pre_cmd('touch föøbàr2.hs'), extra_hc_opts('föøbàr2.hs')],
pcapriotti's avatar
pcapriotti committed
147
     ghci_script, ['T5975b.script'])
pcapriotti's avatar
pcapriotti committed
148
test('T6027ghci', normal, ghci_script, ['T6027ghci.script'])
Simon Marlow's avatar
Simon Marlow committed
149 150

test('T6007', normal, ghci_script, ['T6007.script'])
pcapriotti's avatar
pcapriotti committed
151
test('T6091', normal, ghci_script, ['T6091.script'])
152 153
test('T6106', [extra_files(['../shell.hs']),
               pre_cmd('$MAKE -s --no-print-directory T6106_prep')],
154
     ghci_script, ['T6106.script'])
Simon Marlow's avatar
Simon Marlow committed
155
test('T6105', normal, ghci_script, ['T6105.script'])
parcs's avatar
parcs committed
156
test('T7117', normal, ghci_script, ['T7117.script'])
157 158
test('ghci058', [extra_files(['../shell.hs']),
                 cmd_prefix('ghciWayFlags=' + config.ghci_way_flags)],
159
     ghci_script, ['ghci058.script'])
Simon Peyton Jones's avatar
Simon Peyton Jones committed
160
test('T7587', normal, ghci_script, ['T7587.script'])
Simon Peyton Jones's avatar
Simon Peyton Jones committed
161
test('T7688', normal, ghci_script, ['T7688.script'])
162 163
test('T7627', normal, ghci_script, ['T7627.script'])
test('T7627b', normal, ghci_script, ['T7627b.script'])
Simon Peyton Jones's avatar
Simon Peyton Jones committed
164
test('T7586', normal, ghci_script, ['T7586.script'])
Simon Peyton Jones's avatar
Simon Peyton Jones committed
165
test('T4175', normal, ghci_script, ['T4175.script'])
Jan Stolarek's avatar
Jan Stolarek committed
166 167 168
test('T6018ghci', normal, ghci_script, ['T6018ghci.script'])
test('T6018ghcifail', normal, ghci_script, ['T6018ghcifail.script'])
test('T6018ghcirnfail', normal, ghci_script, ['T6018ghcirnfail.script'])
169
test('T7730', combined_output, ghci_script, ['T7730.script'])
Simon Peyton Jones's avatar
Simon Peyton Jones committed
170
test('T7872', normal, ghci_script, ['T7872.script'])
Simon Peyton Jones's avatar
Simon Peyton Jones committed
171
test('T7873', normal, ghci_script, ['T7873.script'])
Simon Peyton Jones's avatar
Simon Peyton Jones committed
172
test('T7939', normal, ghci_script, ['T7939.script'])
Simon Peyton Jones's avatar
Simon Peyton Jones committed
173
test('T7894', normal, ghci_script, ['T7894.script'])
174
test('T8116', normal, ghci_script, ['T8116.script'])
175
test('T8113', normal, ghci_script, ['T8113.script'])
thomie's avatar
thomie committed
176 177
test('T8172', when(opsys('mingw32'), normalise_drive_letter),
     ghci_script, ['T8172.script'])
Simon Peyton Jones's avatar
Simon Peyton Jones committed
178
test('T8215', normal, ghci_script, ['T8215.script'])
179
test('T8353', extra_files(['Defer03.hs']), ghci_script, ['T8353.script'])
Simon Peyton Jones's avatar
Simon Peyton Jones committed
180
test('T8357', normal, ghci_script, ['T8357.script'])
Simon Peyton Jones's avatar
Simon Peyton Jones committed
181
test('T8383', normal, ghci_script, ['T8383.script'])
Simon Peyton Jones's avatar
Simon Peyton Jones committed
182
test('T8469', normal, ghci_script, ['T8469.script'])
Simon Peyton Jones's avatar
Simon Peyton Jones committed
183 184
test('T8485', normal, ghci_script, ['T8485.script'])
test('T8535', normal, ghci_script, ['T8535.script'])
185
test('T8639', normal, ghci_script, ['T8639.script'])
Simon Peyton Jones's avatar
Simon Peyton Jones committed
186
test('T8640', normal, ghci_script, ['T8640.script'])
Simon Peyton Jones's avatar
Simon Peyton Jones committed
187
test('T8579', normal, ghci_script, ['T8579.script'])
Simon Peyton Jones's avatar
Simon Peyton Jones committed
188
test('T8649', normal, ghci_script, ['T8649.script'])
189
test('T8674', normal, ghci_script, ['T8674.script'])
190
test('T8696', normal, ghci_script, ['T8696.script'])
Gergő Érdi's avatar
Gergő Érdi committed
191
test('T8776', normal, ghci_script, ['T8776.script'])
192
test('ghci059', normal, ghci_script, ['ghci059.script'])
Simon Peyton Jones's avatar
Simon Peyton Jones committed
193
test('T8831', normal, ghci_script, ['T8831.script'])
eir@cis.upenn.edu's avatar
eir@cis.upenn.edu committed
194
test('T8917', normal, ghci_script, ['T8917.script'])
Simon Peyton Jones's avatar
Simon Peyton Jones committed
195
test('T8931', normal, ghci_script, ['T8931.script'])
196
test('T8959', normal, ghci_script, ['T8959.script'])
197
test('T8959b', normal, ghci_script, ['T8959b.script'])
198
test('T9181', normal, ghci_script, ['T9181.script'])
199
test('T9086b', normal, ghci_script, ['T9086b.script'])
200
test('T9140', combined_output, ghci_script, ['T9140.script'])
201
test('T9658', normal, ghci_script, ['T9658.script'])
202 203 204 205

test('T9293', [extra_hc_opts('-fno-ghci-leak-check'), extra_files(['ghci057.hs'])], ghci_script, ['T9293.script'])
  # See Note [Disabling ghci-leak-check]

206 207 208 209 210
test('T9762',
 [ unless(have_dynamic(),skip)
 , pre_cmd('$MAKE -s --no-print-directory T9762_prep')
 ],
 ghci_script, ['T9762.script'])
211
test('T9881', normal, ghci_script, ['T9881.script'])
212 213 214
test('T9878', [], ghci_script, ['T9878.script'])
test('T9878b', [extra_run_opts('-fobject-code')], ghci_script,
     ['T9878b.script'])
215
test('T10018', normal, ghci_script, ['T10018.script'])
Ryan Scott's avatar
Ryan Scott committed
216
test('T10059', normal, ghci_script, ['T10059.script'])
217
test('T10122', normal, ghci_script, ['T10122.script'])
218

219
test('T10321', normal, ghci_script, ['T10321.script'])
220

Ben Gamari's avatar
Ben Gamari committed
221
test('T10408', req_interp, makefile_test, [])
Simon Peyton Jones's avatar
Simon Peyton Jones committed
222
test('T10248', normal, ghci_script, ['T10248.script'])
223
test('T10110', normal, ghci_script, ['T10110.script'])
224
test('T10322', normal, ghci_script, ['T10322.script'])
225
test('T10439', normal, ghci_script, ['T10439.script'])
226
test('T10453', normal, ghci_script, ['T10453.script'])
Simon Peyton Jones's avatar
Simon Peyton Jones committed
227
test('T10466', normal, ghci_script, ['T10466.script'])
228
test('T10501', normal, ghci_script, ['T10501.script'])
229
test('T10508', normal, ghci_script, ['T10508.script'])
230
test('T10520', normal, ghci_script, ['T10520.script'])
231
test('T10663', normal, ghci_script, ['T10663.script'])
232
test('T10989', [], ghci_script, ['T10989.script'])
233
test('T11098', normal, ghci_script, ['T11098.script'])
Ben Gamari's avatar
Ben Gamari committed
234
test('T8316', expect_broken(8316), ghci_script, ['T8316.script'])
235
test('T11252', normal, ghci_script, ['T11252.script'])
Geraldus's avatar
Geraldus committed
236

237 238 239 240
test('T10576a', [extra_files(['T10576.hs']), expect_broken(10576)],
     ghci_script, ['T10576a.script'])
test('T10576b', [extra_files(['T10576.hs']), expect_broken(10576)],
     ghci_script, ['T10576b.script'])
Ben Gamari's avatar
Ben Gamari committed
241 242
test('T11051a', normal, ghci_script, ['T11051a.script'])
test('T11051b', normal, ghci_script, ['T11051b.script'])
243
test('T11266', ignore_stdout, ghci_script, ['T11266.script'])
244

Ben Gamari's avatar
Ben Gamari committed
245
test('T11389', req_interp, makefile_test, [])
246
test('T11524a', normal, ghci_script, ['T11524a.script'])
247
test('T11456', normal, ghci_script, ['T11456.script'])
248
test('TypeAppData', normal, ghci_script, ['TypeAppData.script'])
Simon Peyton Jones's avatar
Simon Peyton Jones committed
249
test('T11728', normal, ghci_script, ['T11728.script'])
250
test('T11376', normal, ghci_script, ['T11376.script'])
251
test('T12007', normal, ghci_script, ['T12007.script'])
252 253
test('T11975', normal, ghci_script, ['T11975.script'])
test('T10963', normal, ghci_script, ['T10963.script'])
254
test('T11721', normal, ghci_script, ['T11721.script'])
255
test('T12005', normal, ghci_script, ['T12005.script'])
Ben Gamari's avatar
Ben Gamari committed
256
test('T12023', normal, makefile_test, [])
Ömer Sinan Ağacan's avatar
Ömer Sinan Ağacan committed
257
test('T12520', normal, ghci_script, ['T12520.script'])
258 259
test('T12091', [extra_run_opts('-fobject-code')], ghci_script,
     ['T12091.script'])
260
test('T12523', normal, ghci_script, ['T12523.script'])
Ben Gamari's avatar
Ben Gamari committed
261
test('T12024', normal, ghci_script, ['T12024.script'])
262
test('T12158', normal, ghci_script, ['T12158.script'])
263
test('T12447', normal, ghci_script, ['T12447.script'])
Ben Gamari's avatar
Ben Gamari committed
264
test('T10249', normal, ghci_script, ['T10249.script'])
265
test('T12550', normal, ghci_script, ['T12550.script'])
266
test('StaticPtr', normal, ghci_script, ['StaticPtr.script'])
267 268
test('T13202', normal, ghci_script, ['T13202.script'])
test('T13202a', normal, ghci_script, ['T13202a.script'])
269
test('T13385', [extra_hc_opts("-XRebindableSyntax")], ghci_script, ['T13385.script'])
270
test('T13420', normal, ghci_script, ['T13420.script'])
271
test('T13466', normal, ghci_script, ['T13466.script'])
272
test('GhciCurDir', normal, ghci_script, ['GhciCurDir.script'])
Ben Gamari's avatar
Ben Gamari committed
273
test('T13591', expect_broken(13591), ghci_script, ['T13591.script'])
274
test('T13699', normal, ghci_script, ['T13699.script'])
275
test('T13988', normal, ghci_script, ['T13988.script'])
276
test('T13407', normal, ghci_script, ['T13407.script'])
Richard Eisenberg's avatar
Richard Eisenberg committed
277
test('T13963', normal, ghci_script, ['T13963.script'])
278 279
test('T14342', [extra_hc_opts("-XOverloadedStrings -XRebindableSyntax")],
               ghci_script, ['T14342.script'])
280
test('T14676', extra_files(['../prog002']), ghci_script, ['T14676.script'])
281
test('T14796', normal, ghci_script, ['T14796.script'])
Richard Eisenberg's avatar
Richard Eisenberg committed
282
test('T14969', normal, ghci_script, ['T14969.script'])
283
test('T15259', normal, ghci_script, ['T15259.script'])
284
test('T15341', normal, ghci_script, ['T15341.script'])
285
test('T15568', normal, ghci_script, ['T15568.script'])
286
test('T15325', normal, ghci_script, ['T15325.script'])
287
test('T15591', normal, ghci_script, ['T15591.script'])
Tobias Dammers's avatar
Tobias Dammers committed
288
test('T15743b', normal, ghci_script, ['T15743b.script'])
289
test('T15827', normal, ghci_script, ['T15827.script'])
290
test('T15872', normal, ghci_script, ['T15872.script'])
291
test('T15898', normal, ghci_script, ['T15898.script'])
292
test('T15941', normal, ghci_script, ['T15941.script'])
293
test('T16030', normal, ghci_script, ['T16030.script'])
294 295
test('T11606', normal, ghci_script, ['T11606.script'])
test('T16089', normal, ghci_script, ['T16089.script'])
296
test('T14828', normal, ghci_script, ['T14828.script'])
297
test('T16376', normal, ghci_script, ['T16376.script'])
298
test('T16509', normal, ghci_script, ['T16509.script'])
299
test('T16527', normal, ghci_script, ['T16527.script'])
300
test('T16569', normal, ghci_script, ['T16569.script'])
301
test('T16767', normal, ghci_script, ['T16767.script'])