Commit b9ce2d57 authored by Simon Marlow's avatar Simon Marlow
Browse files

new test cases for MultiWayIf w/ layout

parent 82cd258f
......@@ -7,9 +7,14 @@ x1 = if | x < 10 -> "< 10" | otherwise -> ""
x2 = if | x < 10 -> "< 10"
| otherwise -> ""
x3 = if | x < 10 -> "< 10"
| otherwise -> ""
| otherwise -> ""
x4 = if | True -> "yes"
x5 = if | True -> if | False -> 1 | True -> 2
main = print $ x5 == 2
x6 = if | x < 10 -> if | True -> "yes"
| False -> "no"
| otherwise -> "maybe"
x7 = (if | True -> 0)
main = print $ x5 == 2 && x6 == "maybe" && x7 == 0
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