Commits

camlspotter committed 2a9975e

lex.mll fixed

Comments (0)

Files changed (2)

tests/Makefile.targets

 intermodule.cmo \
 let_open.cmo \
 lex.cmo \
+lex.cmo \
 localvar.cmo \
 module.cmo \
 module_alias.cmo \
 
 let error lexbuf s =
   raise (Error (lexeme_start lexbuf, lexeme_end lexbuf, s))
+
+let (* empty => *) empty (* <= empty *) = ""
 }
 
 rule exp st = parse
 
 (* CR jfuruse: the test script only provides byte position, 
    which does not work well for .mll *)
-let from_string s = exp (* ? exp *) "" (Lexing.from_string s)
+let from_string s = exp empty (* ? empty *) (Lexing.from_string s)
 
 }