X-Git-Url: https://svn.cri.ensmp.fr/git/Faustine.git/blobdiff_plain/440ca0ba93966e89b68dc54207c461afc0d56264..aef330364c0be4df12fcf5f133caee67e4c2873d:/interpretor/lexer.mll diff --git a/interpretor/lexer.mll b/interpretor/lexer.mll index c6a7cb5..3cb9847 100644 --- a/interpretor/lexer.mll +++ b/interpretor/lexer.mll @@ -7,7 +7,7 @@ rule token = parse [' ' '\t' '\n' ] { token lexbuf } | "+" { IDENT Add} -| "-" { IDENT Sup} +| "-" { IDENT Sub} | "*" { IDENT Mul} | "/" { IDENT Div} | "_" { IDENT Pass} @@ -19,7 +19,7 @@ rule token = parse | "sin" { IDENT Sin} | "cos" { IDENT Cos} | "atan" { IDENT Atan} -| "atantwo" { IDENT Atantwo} +| "atantwo" { IDENT Atan2} | "sqrt" { IDENT Sqrt} | "rdtable" { IDENT Rdtable} | "%" { IDENT Mod} @@ -29,9 +29,11 @@ rule token = parse | "serialize" { IDENT Serialize} | ">" { IDENT Larger} | "<" { IDENT Smaller} +| "max" { IDENT Max} +| "min" { IDENT Min} | "prefix" { IDENT Prefix} -| "selecttwo" { IDENT Selecttwo} -| "selectthree" { IDENT Selectthree} +| "selecttwo" { IDENT Select2} +| "selectthree" { IDENT Select3} | ['0'-'9']+ as a { CONST a }