Commit 15cb83d4 authored by Ben Gamari's avatar Ben Gamari 🐢

Add testcase for #7411

parent 38c98e4f
import Control.Exception
import Control.DeepSeq
main = evaluate (('a' : undefined) `deepseq` return () :: IO ())
test('T7411', [expect_broken_for(7411, ['optasm', 'optllvm',
'hpc', 'threaded2', 'dyn']),
exit_code(1)], compile_and_run, [''])
\ No newline at end of file
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment