Commit dcc49044 authored by Ben Gamari's avatar Ben Gamari Committed by Ben Gamari
Browse files

Add failing testcase for #12433

Test Plan: Validate

Reviewers: austin

Subscribers: thomie

Differential Revision: https://phabricator.haskell.org/D2517

GHC Trac Issues: #11433
parent a7a960e4
f :: Int -> IO ()
f p = case p of
0 -> return ()
1 -> return ()
2 -> return ()
3 -> return ()
4 -> return ()
10 -> return ()
11 -> return ()
_ -> print p
{-# NOINLINE f #-}
main = f 8
......@@ -143,3 +143,4 @@ test('T10870', when(wordsize(32), skip), compile_and_run, [''])
test('PopCnt', omit_ways(['ghci']), multi_compile_and_run,
['PopCnt', [('PopCnt_cmm.cmm', '')], ''])
test('T12059', normal, compile_and_run, [''])
test('T12433', expect_broken(12433), compile_and_run, [''])
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