From af84e080ff674a3d5cf2cf88874ddb6ebaf38ecf Mon Sep 17 00:00:00 2001 From: Pierre Letouzey Date: Tue, 9 Dec 2014 12:48:32 +0100 Subject: Switch the few remaining iso-latin-1 files to utf8 --- library/nametab.ml | 3 --- 1 file changed, 3 deletions(-) (limited to 'library/nametab.ml') diff --git a/library/nametab.ml b/library/nametab.ml index 390789852..0f7b022de 100644 --- a/library/nametab.ml +++ b/library/nametab.ml @@ -523,9 +523,6 @@ let shortest_qualid_of_tactic kn = KnTab.shortest_qualid Id.Set.empty sp !the_tactictab let pr_global_env env ref = - (* Il est important de laisser le let-in, car les streams s'évaluent - paresseusement : il faut forcer l'évaluation pour capturer - l'éventuelle levée d'une exception (le cas échoit dans le debugger) *) try str (string_of_qualid (shortest_qualid_of_global env ref)) with Not_found as e -> prerr_endline "pr_global_env not found"; raise e -- cgit v1.2.3