From 27dffdea5b46f6282c1584db0555213e744352fa Mon Sep 17 00:00:00 2001 From: Pierre-Marie Pédrot Date: Tue, 31 May 2016 13:33:01 +0200 Subject: Revert "Rename Lexer -> CLexer." This reverts commit a66b57ba4bba866bb626bde2b6fe3b762347eb3e. --- tactics/tacinterp.ml | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'tactics') diff --git a/tactics/tacinterp.ml b/tactics/tacinterp.ml index a7acdf7594..5ecc46d670 100644 --- a/tactics/tacinterp.ml +++ b/tactics/tacinterp.ml @@ -491,7 +491,7 @@ let interp_fresh_id ist env sigma l = String.concat "" (List.map (function | ArgArg s -> s | ArgVar (_,id) -> Id.to_string (interp_ident ist env sigma id)) l) in - let s = if CLexer.is_keyword s then s^"0" else s in + let s = if Lexer.is_keyword s then s^"0" else s in Id.of_string s in Tactics.fresh_id_in_env avoid id env -- cgit v1.2.3