Ticket #4501: Test.hs

File Test.hs, 93 bytes (added by CoreyOConnor, 3 years ago)
Line 
1{-# LANGUAGE RebindableSyntax #-}
2
3fail = undefined
4
5main = do
6    fail "Foo"
7    return ()