Project

General

Profile

Revision b3381ae8 src/lexer_lustre.mll

View differences:

src/lexer_lustre.mll
72 72
  "pre", PRE;
73 73
  "div", DIV;
74 74
  "const", CONST;
75
  "open", OPEN;
76 75
  "assert", ASSERT;
77 76
]
78 77

  
......
124 123
| ['0'-'9']+ '.' ['0'-'9']+ ('E'|'e') ('+'|'-') ['0'-'9'] ['0'-'9']* as s {REAL s}
125 124
| "tel." {TEL}
126 125
| "tel;" {TEL}
126
| "#open" { OPEN }
127 127
| ['_' 'a'-'z' 'A'-'Z'] [ '_' 'a'-'z' 'A'-'Z' '0'-'9']*
128 128
    {let s = Lexing.lexeme lexbuf in
129 129
    try

Also available in: Unified diff