==================== Parser ====================
module ShouldFail where
h x = x
foo = do let foo = True