aboutsummaryrefslogtreecommitdiffhomepage
path: root/library/nametab.ml
diff options
context:
space:
mode:
authorGravatar Pierre Letouzey <pierre.letouzey@inria.fr>2014-12-09 12:48:32 +0100
committerGravatar Pierre Letouzey <pierre.letouzey@inria.fr>2014-12-09 14:27:21 +0100
commitaf84e080ff674a3d5cf2cf88874ddb6ebaf38ecf (patch)
treeb8325cd8ce34dd2dcfba2792a0123cf8c46ab703 /library/nametab.ml
parent9c24cecec3a7381cd924c56ca50c77a49750e2e5 (diff)
Switch the few remaining iso-latin-1 files to utf8
Diffstat (limited to 'library/nametab.ml')
-rw-r--r--library/nametab.ml3
1 files changed, 0 insertions, 3 deletions
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