aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorEnrico Tassi2020-10-09 23:34:09 +0200
committerGitHub2020-10-09 23:34:09 +0200
commite58642678bcc40fba51dd012d51c8518b639d0ab (patch)
treefe206d23839a16b157e726a25c38c70e09c53bd9
parenta96f0868712f725ae3ff7c8fddf54684413bb31c (diff)
Update pretyping/detyping.ml
Co-authored-by: Hugo Herbelin <herbelin@users.noreply.github.com>
-rw-r--r--pretyping/detyping.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/pretyping/detyping.ml b/pretyping/detyping.ml
index 239a10786b..91c155fcce 100644
--- a/pretyping/detyping.ml
+++ b/pretyping/detyping.ml
@@ -885,7 +885,7 @@ and detype_binder d flags bk avoid env sigma decl c =
(* Heuristic: we display the type if in Prop *)
let s =
(* It can fail if ty is an evar, or if run inside ocamldebug or the
- OCaml toplevel since their printers don't have access to sigma/env *)
+ OCaml toplevel since their printers don't have access to the proper sigma/env *)
try Retyping.get_sort_family_of (snd env) sigma ty
with Retyping.RetypeError _ -> InType
in