]> matita.cs.unibo.it Git - helm.git/blobdiff - helm/ocaml/cic_disambiguation/cicTextualLexer2.ml
fixed comments
[helm.git] / helm / ocaml / cic_disambiguation / cicTextualLexer2.ml
index 4cf0e4270a2fe29e53fdacac1aa017f83e055799..733166d7eeb0dacf27f587db1c136fc57ca2fd61 100644 (file)
@@ -38,10 +38,13 @@ let regexp symbol_char =
      '\\' '(' '[' '{' ')' ']' '}' '?'
   ]
 let regexp dust = "%%" [^ '\n']* '\n'
-let regexp comment_char = [^ "*)" ]
+
+let regexp comment_char = [^ ")" ]
 let regexp note = "(*" comment_char* "*)"
+
 let regexp commentbegin = "(**"
 let regexp commentend = "**)"
+
 let regexp blanks = blank+
 let regexp num = digit+
 let regexp tex_token = '\\' alpha+