]> matita.cs.unibo.it Git - helm.git/commitdiff
"in" and "and" are now keywords
authorStefano Zacchiroli <zack@upsilon.cc>
Mon, 4 Oct 2004 09:38:04 +0000 (09:38 +0000)
committerStefano Zacchiroli <zack@upsilon.cc>
Mon, 4 Oct 2004 09:38:04 +0000 (09:38 +0000)
helm/ocaml/cic_disambiguation/cicTextualLexer2.ml

index ba70d2745c8f73126733eff03c32664e15a1fc75..6c2986eaad03ef204f3f637d5eae2cdf404cae38 100644 (file)
@@ -51,7 +51,8 @@ let regexp uri =
 let keywords = Hashtbl.create 17
 let _ =
   List.iter (fun keyword -> Hashtbl.add keywords keyword ("", keyword))
-    [ "Prop"; "Type"; "Set"; "let"; "Let"; "rec"; "using"; "match"; "with" ]
+    [ "Prop"; "Type"; "Set"; "let"; "Let"; "rec"; "using"; "match"; "with";
+      "in"; "and" ]
 
 let error lexbuf msg =
   raise (Error (Ulexing.lexeme_start lexbuf, Ulexing.lexeme_end lexbuf, msg))