@@ -235,8 +235,3 @@ typeAnnotation = TypeAnnotation <$> try start <*> Type.expr
236def :: IParser (Def t v)
236def :: IParser (Def t v)
237def = typeAnnotation <|> assignExpr
237def = typeAnnotation <|> assignExpr
239−attempt f parser str =
240− case iParse parser "" str of
241− Right result -> f result
242− Left err -> error $ "Parse error at " ++ show err