diff options
| author | Hugo Herbelin | 2018-12-26 22:52:52 +0100 |
|---|---|---|
| committer | Hugo Herbelin | 2018-12-26 22:52:52 +0100 |
| commit | 86fc5bbbd93f7e6c380bc3a9a4271fc83214264d (patch) | |
| tree | 47aeebee726a737dd178425534a50f88448f5816 /printing | |
| parent | 599696d804eb7c40661615a49c5d729e7d6ff373 (diff) | |
| parent | 70a139733dfaa42d665a85736ee4324d926723ed (diff) | |
Merge PR #8734: Make diffs work for more input strings
Diffstat (limited to 'printing')
| -rw-r--r-- | printing/proof_diffs.ml | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/printing/proof_diffs.ml b/printing/proof_diffs.ml index b280ce909b..c1ea067567 100644 --- a/printing/proof_diffs.ml +++ b/printing/proof_diffs.ml @@ -88,7 +88,8 @@ let tokenize_string s = let st = CLexer.get_lexer_state () in try let istr = Stream.of_string s in - let lex = CLexer.lexer.Gramlib.Plexing.tok_func istr in + let lexer = CLexer.make_lexer ~diff_mode:true in + let lex = lexer.Gramlib.Plexing.tok_func istr in let toks = stream_tok [] (fst lex) in CLexer.set_lexer_state st; toks |