CatalaLang/catala
1
1
Fork 0
mirror of https://github.com/CatalaLang/catala.git synced 2024-09-19 00:15:39 +03:00
Code Issues Projects Releases Wiki Activity

Small fix

Browse Source
This commit is contained in:
Louis Gesbert 2021-08-19 20:41:34 +02:00
parent 98aed4187a
commit dfb358993c
1 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
compiler/surface/lexer.cppo.ml
View File

@ -299,10 +299,10 @@ let token_list : (string * token) list =
let lex_builtin (s : string) : Ast.builtin_expression option =
let lexbuf = Utf8.from_string s in
match%sedlex lexbuf with
| MS_IntToDec, eof -> Some IntToDec
| MS_GetDay, eof -> Some GetDay
| MS_GetMonth, eof -> Some GetMonth
| MS_GetYear, eof -> Some GetYear
| MR_IntToDec, eof -> Some IntToDec
| MR_GetDay, eof -> Some GetDay
| MR_GetMonth, eof -> Some GetMonth
| MR_GetYear, eof -> Some GetYear
| _ -> None
(** Regexp matching any digit character.