equal
deleted
inserted
replaced
225 |
225 |
226 (* arguments within outer syntax *) |
226 (* arguments within outer syntax *) |
227 |
227 |
228 val argument_kinds = |
228 val argument_kinds = |
229 [Token.Ident, Token.LongIdent, Token.SymIdent, Token.Var, Token.TypeIdent, Token.TypeVar, |
229 [Token.Ident, Token.LongIdent, Token.SymIdent, Token.Var, Token.TypeIdent, Token.TypeVar, |
230 Token.Nat, Token.Float, Token.String, Token.AltString, Token.Verbatim]; |
230 Token.Nat, Token.Float, Token.String, Token.AltString, Token.Cartouche, Token.Verbatim]; |
231 |
231 |
232 fun parse_args is_symid = |
232 fun parse_args is_symid = |
233 let |
233 let |
234 fun argument blk = |
234 fun argument blk = |
235 Parse.group (fn () => "argument") |
235 Parse.group (fn () => "argument") |