From cc00abd9e33a00d3c7acfe310bf8d6522e9a1888 Mon Sep 17 00:00:00 2001
From: Alex AUVOLAT <alex.auvolat@ens.fr>
Date: Fri, 10 Jan 2014 18:38:23 +0100
Subject: Use newlines as delimiters.

---
 asm/asmlex.mll | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

(limited to 'asm/asmlex.mll')

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 }
-- 
cgit v1.2.3