diff options
Diffstat (limited to 'paper/While/WhileLexer.icl')
-rw-r--r-- | paper/While/WhileLexer.icl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/paper/While/WhileLexer.icl b/paper/While/WhileLexer.icl index 458f260..deb7fcd 100644 --- a/paper/While/WhileLexer.icl +++ b/paper/While/WhileLexer.icl @@ -45,7 +45,7 @@ lex ['/':cs] = lexyield DivToken cs lex ['(':cs] = lexyield ParenOpen cs lex [')':cs] = lexyield ParenClose cs lex cs=:[c:rest] - | isAlpha c = let (id, cs`) = span isAlpha cs in + | isAlpha c = let (id, cs`) = span isAlpha cs in lexyield (VarToken (toString id)) cs` | isDigit c = let (lit, cs`) = span isDigit cs in lexyield (LiteralToken (toInt lit)) cs` |