]> matita.cs.unibo.it Git - helm.git/commitdiff
Porting to the new "long-identifiers" editex lexer.
authorClaudio Sacerdoti Coen <claudio.sacerdoticoen@unibo.it>
Wed, 18 Jun 2003 12:59:11 +0000 (12:59 +0000)
committerClaudio Sacerdoti Coen <claudio.sacerdoticoen@unibo.it>
Wed, 18 Jun 2003 12:59:11 +0000 (12:59 +0000)
helm/ocaml/tex_cic_textual_parser/texCicTextualLexer.mll

index 320162c752e8b3abb57b62e4e6e05249511e71d0..01ddd0cf302acdede1f9b14f086864077677ce10 100644 (file)
@@ -71,7 +71,7 @@ let conuri = baseuri "con"
 let varuri = baseuri "var"
 let indtyuri = baseuri "ind#1/" num
 let indconuri = baseuri "ind#1/" num "/" num
-let blanks = [' ' '\t' '\n' '~' '{' '}'] | "\\;"
+let blanks = [' ' '\t' '\n' '~' '{' '}'] | "\\;" | "\\rm"
 rule token =
  parse
     blanks      { token lexbuf } (* skip blanks *)