diff options
author | herbelin <herbelin@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2008-10-18 15:57:24 +0000 |
---|---|---|
committer | herbelin <herbelin@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2008-10-18 15:57:24 +0000 |
commit | 8cf4e04fa817cf7ff9d73cb5cb7fff8b3b950387 (patch) | |
tree | 30fbd47a7c79a0bc4e5d8a94db78294e6b62b02f /kernel/term.mli | |
parent | 41dcb1603ea2e212a9167918f3d5dcb6f166e27b (diff) |
Optimisation de clenv.ml pour que meta_instance ne soit pas appelé
abusivement sur les clauses.
Nettoyage au passage de metamap qui était utilisé à la fois pour les
substitutions de meta et pour les contextes de typage de meta.
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@11467 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'kernel/term.mli')
-rw-r--r-- | kernel/term.mli | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/kernel/term.mli b/kernel/term.mli index 2ab03e50f..5d75df4bf 100644 --- a/kernel/term.mli +++ b/kernel/term.mli @@ -208,6 +208,7 @@ type ('constr, 'types) kind_of_term = term *) val kind_of_term : constr -> (constr, types) kind_of_term +val kind_of_term2 : constr -> ((constr,types) kind_of_term,constr) kind_of_term (* Experimental *) type ('constr, 'types) kind_of_type = |