X-Git-Url: https://scm.cri.ensmp.fr/git/Faustine.git/blobdiff_plain/8c48d01c4b78dba6159c13438b06cb7e07a1f338..66f23d4fabf89ad09adbd4dfc15ac6b5b2b7da83:/interpretor/lexer.mll diff --git a/interpretor/lexer.mll b/interpretor/lexer.mll deleted file mode 100644 index 1c427a9..0000000 --- a/interpretor/lexer.mll +++ /dev/null @@ -1,48 +0,0 @@ -{ -open Parser -open Types -} - -rule token = parse - [' ' '\t' '\n' ] { token lexbuf } - -| "+" { IDENT Add} -| "-" { IDENT Sub} -| "*" { IDENT Mul} -| "/" { IDENT Div} -| "_" { IDENT Pass} -| "!" { IDENT Stop} -| "mem" { IDENT Mem} -| "@" { IDENT Delay} -| "floor" { IDENT Floor} -| "int" { IDENT Int} -| "sin" { IDENT Sin} -| "cos" { IDENT Cos} -| "atan" { IDENT Atan} -| "atantwo" { IDENT Atan2} -| "sqrt" { IDENT Sqrt} -| "rdtable" { IDENT Rdtable} -| "%" { IDENT Mod} -| "vectorize" { IDENT Vectorize} -| "#" { IDENT Vconcat} -| "[]" { IDENT Vpick } -| "serialize" { IDENT Serialize} -| ">" { IDENT Larger} -| "<" { IDENT Smaller} -| "prefix" { IDENT Prefix} -| "selecttwo" { IDENT Select2} -| "selectthree" { IDENT Select3} - - -| ['0'-'9']+ as a { CONST a } -| '.' { POINT } - - -| '(' { LPAR } -| ')' { RPAR } -| ',' { PAR } -| ':' { SEQ } -| "<:" { SPLIT } -| ":>" { MERGE } -| "~" { REC } -| eof { EOF }