Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP
Browse files

Make T7319 run in all ways

It used to give different answers because of different
exceptoin behaviour (cf #7737) but now it's fine
  • Loading branch information...
commit cfd5bc12b0f70df5f3a98f9fb3effd6e85ba1b03 1 parent 250b7d6
@simonpj simonpj authored
View
4 tests/codeGen/should_run/T7319.stderr
@@ -1,5 +1 @@
-*** Exception (reporting due to +RTS -xc): (base:GHC.Exception.SomeException), stack trace:
- Main.foo,
- called from Main.main,
- called from Main.CAF
T7319: test
View
12 tests/codeGen/should_run/all.T
@@ -97,11 +97,15 @@ test('T6146', normal, compile_and_run, [''])
test('T5900', normal, compile_and_run, [''])
test('T7163', normal, compile_and_run, [''])
+# T7319 now gives the same results in every 'way', so treat it as normal
+test('T7319', exit_code(1), compile_and_run, [''])
+
# Gives different results when optimised, so restrict to just one way
-test('T7319', [ extra_ways(['prof']), only_ways(['prof']), exit_code(1),
- req_profiling,
- extra_hc_opts('-fprof-auto'),
- extra_run_opts('+RTS -xc') ], compile_and_run, [''])
+#test('T7319', [ extra_ways(['prof']), only_ways(['prof']), exit_code(1),
+# req_profiling,
+# extra_hc_opts('-fprof-auto'),
+# extra_run_opts('+RTS -xc') ], compile_and_run, [''])
+
test('Word2Float32', unless(wordsize(32), skip), compile_and_run, [''])
test('Word2Float64', unless(wordsize(64), skip), compile_and_run, [''])

0 comments on commit cfd5bc1

Please sign in to comment.
Something went wrong with that request. Please try again.