aboutsummaryrefslogtreecommitdiff
path: root/pretyping/pretyping.ml
diff options
context:
space:
mode:
authorherbelin2005-02-18 22:14:57 +0000
committerherbelin2005-02-18 22:14:57 +0000
commitd56dbd226a805d93d539c63e9fa89062572bb295 (patch)
treeffe757ec9a756e061b6a22270814e5417b790732 /pretyping/pretyping.ml
parentf1c9b401cf40df87eb4be7ca512a6bc199f09b7c (diff)
Standardisation of function names about global references (especially, renaming of constr_of_reference into constr_of_global)
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@6745 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'pretyping/pretyping.ml')
-rw-r--r--pretyping/pretyping.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/pretyping/pretyping.ml b/pretyping/pretyping.ml
index bc6294d764..55fad22826 100644
--- a/pretyping/pretyping.ml
+++ b/pretyping/pretyping.ml
@@ -237,7 +237,7 @@ let make_dep_of_undep env (IndType (indf,realargs)) pj =
(* Main pretyping function *)
let pretype_ref isevars env ref =
- let c = constr_of_reference ref in
+ let c = constr_of_global ref in
make_judge c (Retyping.get_type_of env Evd.empty c)
let pretype_sort = function