summaryrefslogtreecommitdiff
path: root/testsuite/tests/rts/2783.hs
blob: 5edca4e7cd5857ef8bc3d2c1fdd74e0ed3b845f3 (plain)
1
main = print $ do x <- [ 0 .. 5 ] ; let { y = 5 - y } ; return y