{-# LANGUAGE RebindableSyntax #-}

fail = undefined

main = do
    fail "Foo"
    return ()