diff options
author | Alex AUVOLAT <alex.auvolat@ens.fr> | 2014-01-10 18:38:23 +0100 |
---|---|---|
committer | Alex AUVOLAT <alex.auvolat@ens.fr> | 2014-01-10 18:38:23 +0100 |
commit | cc00abd9e33a00d3c7acfe310bf8d6522e9a1888 (patch) | |
tree | 0ef555fb2116466fcef0bda4d3504d2a89461970 /asm/asmlex.mll | |
parent | b840059a7f2fb0e3796414f30f1e241d03b44dbf (diff) | |
download | SystDigit-Projet-cc00abd9e33a00d3c7acfe310bf8d6522e9a1888.tar.gz SystDigit-Projet-cc00abd9e33a00d3c7acfe310bf8d6522e9a1888.zip |
Use newlines as delimiters.
Diffstat (limited to 'asm/asmlex.mll')
-rw-r--r-- | asm/asmlex.mll | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/asm/asmlex.mll b/asm/asmlex.mll index cace4b7..fc77c93 100644 --- a/asm/asmlex.mll +++ b/asm/asmlex.mll @@ -86,7 +86,7 @@ rule token = parse | '#' { comment lexbuf } | ['\t' '\r' ' '] { token lexbuf } | ':' { COLON } - | '\n' { Lexing.new_line lexbuf; token lexbuf } + | '\n' { Lexing.new_line lexbuf; NLB } | ((['a'-'z'] | '_') (alpha | digit | '_')*) as id { try ROP (List.assoc id keywords_r) with Not_found -> try RIOP (List.assoc id keywords_ri) @@ -104,7 +104,6 @@ rule token = parse | '(' { LP } | ')' { RP } | '"' { str [] lexbuf } - |';' { SEMIC } and str acc = parse | "\\\\" { str ('\\' :: acc) lexbuf } |