diff options
Diffstat (limited to 'testsuite/tests/simplCore/should_compile/T9400.hs')
-rw-r--r-- | testsuite/tests/simplCore/should_compile/T9400.hs | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/testsuite/tests/simplCore/should_compile/T9400.hs b/testsuite/tests/simplCore/should_compile/T9400.hs index 4e9cb72cb9..85aad51564 100644 --- a/testsuite/tests/simplCore/should_compile/T9400.hs +++ b/testsuite/tests/simplCore/should_compile/T9400.hs @@ -16,3 +16,7 @@ main = do (x:xs) -> putStrLn xs case "ab" of "" -> putStrLn "fail" + case "\0abc" of + (x:xs) -> putStrLn xs + case "zażółćz" of + (x:xs) -> putStrLn xs |