diff --git a/lexer.mll b/lexer.mll index 9d9cc64..d4bb46b 100644 --- a/lexer.mll +++ b/lexer.mll @@ -10,8 +10,8 @@ rule token = parse | ')' { RPAREN } | "->" { RARROW } | '~' { TILDE } - | "/\\" { LAND } - | "\\/" { LOR } + | "/\\" { LAND } (* logical and *) + | "\\/" { LOR } (* logical or *) | ',' { COMMA } | "intro" { INTRO } @@ -22,7 +22,7 @@ rule token = parse | "split" { SPLIT } | "left" { LEFT } | "right" { RIGHT } - + | "False" { FALSE } | "fun" { FUN }