diff options
author | clrenard <clrenard@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2001-11-06 13:05:45 +0000 |
---|---|---|
committer | clrenard <clrenard@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2001-11-06 13:05:45 +0000 |
commit | 22ac53765e6f3d8ee2f05ad5fcdb046fbf4b6baf (patch) | |
tree | 3c7468e9f0703d9e70b3aea539aaf8a28ec6a0ed /pretyping/retyping.mli | |
parent | 8cd83fb8dd41521bbc109d37dd49dd3aae0de373 (diff) |
Suppression des local_constraints, des ctxtty et du focus.
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@2163 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'pretyping/retyping.mli')
-rw-r--r-- | pretyping/retyping.mli | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/pretyping/retyping.mli b/pretyping/retyping.mli index c8ef3d2e5..cec8c5f9d 100644 --- a/pretyping/retyping.mli +++ b/pretyping/retyping.mli @@ -23,14 +23,14 @@ open Environ type metamap = (int * constr) list -val get_type_of : env -> 'a evar_map -> constr -> constr -val get_sort_of : env -> 'a evar_map -> types -> sorts -val get_sort_family_of : env -> 'a evar_map -> types -> sorts_family +val get_type_of : env -> evar_map -> constr -> constr +val get_sort_of : env -> evar_map -> types -> sorts +val get_sort_family_of : env -> evar_map -> types -> sorts_family -val get_type_of_with_meta : env -> 'a evar_map -> metamap -> constr -> constr +val get_type_of_with_meta : env -> evar_map -> metamap -> constr -> constr (* Makes an assumption from a constr *) -val get_assumption_of : env -> 'a evar_map -> constr -> types +val get_assumption_of : env -> evar_map -> constr -> types (* Makes an unsafe judgment from a constr *) -val get_judgment_of : env -> 'a evar_map -> constr -> unsafe_judgment +val get_judgment_of : env -> evar_map -> constr -> unsafe_judgment |