]> matita.cs.unibo.it Git - helm.git/blobdiff - helm/ocaml/cic_notation/cicNotationLexer.ml
incomplete snapshot ....
[helm.git] / helm / ocaml / cic_notation / cicNotationLexer.ml
index c1701c96b821c92bcbbdef9147166e272f69235e..8ee8eca78423aa3de66bcf9cdaee34093639fea8 100644 (file)
@@ -146,7 +146,7 @@ let return_eoi lexbuf = return lexbuf ("EOI", "")
 
 let remove_quotes s = String.sub s 1 (String.length s - 2)
 
-let mk_lexer ?(use_ligatures = false) token =
+let mk_lexer token =
   let tok_func stream =
 (*     let lexbuf = Ulexing.from_utf8_stream stream in *)
 (** XXX Obj.magic rationale.