stg_floatToWord32zh: zero-extend the Word32 (#16617)
[ghc.git] / testsuite / tests / codeGen / should_run / all.T
1 # Test +RTS -G1 here (it isn't tested anywhere else)
2 setTestOpts(unless(fast(), extra_ways(['g1'])))
3
4 test('cgrun001', normal, compile_and_run, [''])
5 test('cgrun002', normal, compile_and_run, [''])
6 test('cgrun003', normal, compile_and_run, [''])
7 test('cgrun004', normal, compile_and_run, [''])
8 test('cgrun005', normal, compile_and_run, [''])
9 test('cgrun006', normal, compile_and_run, [''])
10 test('cgrun007', normal, compile_and_run, [''])
11 test('cgrun008', normal, compile_and_run, [''])
12 test('cgrun009', normal, compile_and_run, [''])
13 test('cgrun010', normal, compile_and_run, [''])
14 test('cgrun011', normal, compile_and_run, [''])
15 test('cgrun012', normal, compile_and_run, [''])
16 test('cgrun013', normal, compile_and_run, [''])
17 test('cgrun014', normal, compile_and_run, [''])
18 test('cgrun015', normal, compile_and_run, [''])
19 test('cgrun016', exit_code(1), compile_and_run, [''])
20 test('cgrun017', normal, compile_and_run, [''])
21 test('cgrun018', normal, compile_and_run, [''])
22 test('cgrun019', normal, compile_and_run, [''])
23 test('cgrun020', normal, compile_and_run, [''])
24
25 # cgrun021 does some GC, so let's use it to test GC parameters
26 test('cgrun021', extra_ways(['nursery_chunks']), compile_and_run, [''])
27
28 test('cgrun022', normal, compile_and_run, [''])
29 test('cgrun024', normal, compile_and_run, [''])
30 test('cgrun025',
31      [reqlib('regex-compat'), extra_run_opts('cgrun025.hs'), exit_code(1)],
32      compile_and_run, ['-package regex-compat'])
33 test('cgrun026', normal, compile_and_run, [''])
34 test('cgrun027', normal, compile_and_run, [''])
35 test('cgrun028', normal, compile_and_run, [''])
36 test('cgrun031', normal, compile_and_run, [''])
37 test('cgrun032', normal, compile_and_run, [''])
38 test('cgrun033', normal, compile_and_run, [''])
39 test('cgrun034', normal, compile_and_run, [''])
40 test('cgrun035', normal, compile_and_run, [''])
41 test('cgrun036', normal, compile_and_run, [''])
42 test('cgrun037', normal, compile_and_run, [''])
43 test('cgrun038', normal, compile_and_run, [''])
44 test('cgrun039', normal, compile_and_run, [''])
45 test('cgrun040', normal, compile_and_run, [''])
46 test('cgrun043', normal, compile_and_run, [''])
47 test('cgrun044', normal, compile_and_run, [''])
48 test('cgrun045', exit_code(1), compile_and_run, [''])
49 test('cgrun046', normal, compile_and_run, [''])
50 test('cgrun047', normal, compile_and_run, [''])
51 test('cgrun048', normal, compile_and_run, [''])
52 test('cgrun049', normal, compile_and_run, ['-funbox-strict-fields'])
53 test('cgrun050', normal, compile_and_run, [''])
54 test('cgrun051', [exit_code(1)], compile_and_run, [''])
55 test('cgrun052', only_ways(['optasm']), compile_and_run, ['-funbox-strict-fields'])
56 test('cgrun053', normal, compile_and_run, [''])
57 test('cgrun054', normal, compile_and_run, [''])
58 test('cgrun055', normal, compile_and_run, [''])
59 test('cgrun056', normal, compile_and_run, [''])
60 test('cgrun057', [ only_ways(prof_ways),
61                    extra_run_opts('+RTS -xc') ], compile_and_run, [''])
62 test('cgrun058', normal, compile_and_run, [''])
63 test('cgrun059', exit_code(1), compile_and_run, [''])
64 test('cgrun060',
65      extra_run_opts('+RTS -K64k -RTS'),
66      compile_and_run, [''])
67 test('cgrun061', normal, compile_and_run, [''])
68 test('cgrun062', normal, compile_and_run, [''])
69 test('cgrun063', normal, compile_and_run, [''])
70 test('cgrun064', normal, compile_and_run, [''])
71 test('cgrun065', normal, compile_and_run, [''])
72 test('cgrun066', normal, compile_and_run, [''])
73 test('cgrun067', [extra_files(['Cgrun067A.hs'])], compile_and_run, [''])
74 test('cgrun068', reqlib('random'), compile_and_run, [''])
75 test('cgrun069',
76      [when(unregisterised(), expect_broken(15467)),
77       omit_ways(['ghci'])],
78      multi_compile_and_run,
79      ['cgrun069', [('cgrun069_cmm.cmm', '')], ''])
80 test('cgrun070', normal, compile_and_run, [''])
81 test('cgrun071', [when(have_cpu_feature('sse4_2'), extra_hc_opts('-msse4.2'))], compile_and_run, [''])
82 test('cgrun072', normal, compile_and_run, [''])
83 test('cgrun075', normal, compile_and_run, [''])
84 test('cgrun076', normal, compile_and_run, [''])
85 test('cgrun077', [when(have_cpu_feature('bmi2'), extra_hc_opts('-mbmi2'))], compile_and_run, [''])
86
87 test('T1852', normal, compile_and_run, [''])
88 test('T1861', extra_run_opts('0'), compile_and_run, [''])
89 test('T2080', normal, compile_and_run, [''])
90 test('T2838', normal, compile_and_run, [''])
91 test('T3207', normal, compile_and_run, [''])
92 test('T3561', normal, compile_and_run, [''])
93 test('T3677', extra_run_opts('+RTS -K8k -RTS'), compile_and_run, [''])
94 test('T4441', normal, compile_and_run, [''])
95 test('T5149', omit_ways(['ghci']), multi_compile_and_run,
96                  ['T5149', [('T5149_cmm.cmm', '')], ''])
97 test('T5129',
98      # The bug is in simplifier when run with -O1 and above, so only run it
99      # optimised, using any backend.
100      only_ways(['optasm']),
101      compile_and_run, [''])
102 test('T5626', exit_code(1), compile_and_run, [''])
103 test('T5747', when(arch('i386'), extra_hc_opts('-msse2')), compile_and_run, ['-O2'])
104 test('T5785', normal, compile_and_run, [''])
105 test('setByteArray', normal, compile_and_run, [''])
106 test('compareByteArrays', normal, compile_and_run, [''])
107
108 test('T6146', normal, compile_and_run, [''])
109 test('T5900', normal, compile_and_run, [''])
110 test('T7163', normal, compile_and_run, [''])
111
112 # T7319 now gives the same results in every 'way', so treat it as normal
113 test('T7319', exit_code(1), compile_and_run, [''])
114
115 # Gives different results when optimised, so restrict to just one way
116 #test('T7319', [ extra_ways(['prof']), only_ways(['prof']), exit_code(1),
117 #                req_profiling,
118 #                extra_hc_opts('-fprof-auto'),
119 #                extra_run_opts('+RTS -xc') ], compile_and_run, [''])
120
121 test('Word2Float32', unless(wordsize(32), skip), compile_and_run, [''])
122 test('Word2Float64', unless(wordsize(64), skip), compile_and_run, [''])
123
124 test('T7361', normal, compile_and_run, [''])
125 test('T7600', normal, compile_and_run, [''])
126 test('T8103', only_ways(['normal']), compile_and_run, [''])
127 test('T7953', reqlib('random'), compile_and_run, [''])
128 test('T8256', normal, compile_and_run, ['-dcore-lint -O1'])
129 test('T6084',normal, compile_and_run, ['-O2'])
130 test('CgStaticPointers', [when(doing_ghci(), extra_hc_opts('-fobject-code'))],
131      compile_and_run, [''])
132 test('CgStaticPointersNoFullLazyness', [when(doing_ghci(), extra_hc_opts('-fobject-code'))],
133      compile_and_run, ['-O -fno-full-laziness'])
134 test('StaticArraySize', [when(doing_ghci(), extra_hc_opts('-fobject-code'))],
135      compile_and_run, ['-O2'])
136 test('StaticByteArraySize', normal, compile_and_run, ['-O2'])
137 test('CopySmallArray', normal, compile_and_run, [''])
138 test('CopySmallArrayStressTest', reqlib('random'), compile_and_run, [''])
139 test('SizeOfSmallArray', normal, compile_and_run, [''])
140 test('NewSmallArray', normal, compile_and_run, [''])
141 test('T9001', normal, compile_and_run, [''])
142 test('T9013', omit_ways(['ghci']),  # ghci doesn't support unboxed tuples
143      compile_and_run, [''])
144 test('T9340', normal, compile_and_run, [''])
145 test('cgrun074', normal, compile_and_run, [''])
146 test('CmmSwitchTest32', unless(wordsize(32), skip), compile_and_run, [''])
147 test('CmmSwitchTest64', unless(wordsize(64), skip), compile_and_run, [''])
148 # Skipping WAY=ghci, because it is not broken.
149 test('T10245', normal, compile_and_run, [''])
150 test('T10246', normal, compile_and_run, [''])
151 test('T9533', normal, compile_and_run, [''])
152 test('T9533b', normal, compile_and_run, [''])
153 test('T9533c', normal, compile_and_run, [''])
154 test('T10414', [only_ways(['threaded2']), extra_ways(['threaded2']), req_smp],
155      compile_and_run, ['-feager-blackholing'])
156 test('T10521', normal, compile_and_run, [''])
157 test('T10521b', normal, compile_and_run, [''])
158 test('T10870', when(wordsize(32), skip), compile_and_run, [''])
159 test('PopCnt', omit_ways(['ghci']), multi_compile_and_run,
160                  ['PopCnt', [('PopCnt_cmm.cmm', '')], ''])
161 test('T12059', normal, compile_and_run, [''])
162 test('T12433', normal, compile_and_run, [''])
163 test('T12622', normal, multimod_compile_and_run, ['T12622', '-O'])
164 test('T12757', normal, compile_and_run, [''])
165 test('T12855', normal, compile_and_run, [''])
166 test('T9577', [ unless(arch('x86_64') or arch('i386'),skip),
167                 when(opsys('darwin'), expect_broken(12937)),
168                 when(opsys('mingw32'), expect_broken(12965)),
169                 when(unregisterised(), skip),
170                 only_ways(['normal']) ], compile_and_run, [''])
171
172 test('T13425', normal, compile_and_run, ['-O'])
173 test('castFloatWord', normal, compile_and_run, ['-dcmm-lint'])
174 test('T13825-unit',
175      extra_run_opts('"' + config.libdir + '"'),
176      compile_and_run,
177      ['-package ghc'])
178 test('T14619', normal, compile_and_run, [''])
179 test('T14754', normal, compile_and_run, [''])
180 test('T14346', only_ways(['threaded1','threaded2']), compile_and_run, ['-O -threaded'])
181 test('T14251', [expect_broken_for(14251, ['optllvm'])],
182      compile_and_run, [''])
183
184 # These actually used to fail with all optimisation settings, but adding -O just
185 # to make sure
186 test('T15696_1', normal, compile_and_run, ['-O'])
187 test('T15696_2', normal, compile_and_run, ['-O'])
188 # This requires -O
189 test('T15696_3', normal, compile_and_run, ['-O'])
190
191 test('T15892',
192      [ ignore_stdout,
193         # we want to do lots of major GC to make the bug more likely to
194         # happen, so -G1 -A32k:
195         extra_run_opts('+RTS -G1 -A32k -RTS') ],
196      compile_and_run, ['-O'])
197 test('T16617', normal, compile_and_run, [''])