diff options
Diffstat (limited to 'testsuite/tests/quotes/T20893.stdout')
-rw-r--r-- | testsuite/tests/quotes/T20893.stdout | 14 |
1 files changed, 14 insertions, 0 deletions
diff --git a/testsuite/tests/quotes/T20893.stdout b/testsuite/tests/quotes/T20893.stdout new file mode 100644 index 0000000000..c08abdd03d --- /dev/null +++ b/testsuite/tests/quotes/T20893.stdout @@ -0,0 +1,14 @@ +main_0 = do {case 0 of + {0 -> 1}; + System.IO.putStrLn "pass"} +main_0 = do {let {day_1 = "mon"}; + let {num_2 = case day_1 of + {"mon" -> 0; + "tue" -> 1; + "wed" -> 3; + "thu" -> 4; + "fri" -> 5; + "sat" -> 6; + "sun" -> 7; + _ -> 8}}; + System.IO.putStrLn (GHC.Show.show day_1) GHC.Base.++ " is " (GHC.Show.show num_2)}
\ No newline at end of file |