| changeset 55497 | c0f8aebfb43d |
| parent 55494 | 009b71c1ed23 |
| child 55505 | 2a1ca7f6607b |
--- a/src/Pure/Isar/token.scala Fri Feb 14 20:58:48 2014 +0100 +++ b/src/Pure/Isar/token.scala Fri Feb 14 21:06:20 2014 +0100 @@ -81,7 +81,7 @@ (x => Token(Token.Kind.SYM_IDENT, x)) val command_keyword = - keyword(lexicon) ^^ + literal(lexicon) ^^ (x => Token(if (is_command(x)) Token.Kind.COMMAND else Token.Kind.KEYWORD, x)) val space = many1(Symbol.is_blank) ^^ (x => Token(Token.Kind.SPACE, x))