@@ -497,7 +497,7 @@ parseArrayBinder = LiteralBinder <$> parseArrayLiteral (indented *> parseBinder)
497parseVarOrNamedBinder :: TokenParser Binder
497parseVarOrNamedBinder :: TokenParser Binder
498parseVarOrNamedBinder = do
498parseVarOrNamedBinder = do
499 name <- parseIdent
499 name <- parseIdent
500− let parseNamedBinder = NamedBinder name <$> (at *> indented *> parseBinderNoParens)
500+ let parseNamedBinder = NamedBinder name <$> (at *> indented *> parseBinderAtom)
501 parseNamedBinder <|> return (VarBinder name)
501 parseNamedBinder <|> return (VarBinder name)
503parseNullBinder :: TokenParser Binder
503parseNullBinder :: TokenParser Binder