diff options
| author |  msozeau <msozeau@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2009-05-27 17:24:55 +0000 |
|---|---|---|
| committer | msozeau <msozeau@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2009-05-27 17:24:55 +0000 |
| commit | a0df6a89bd29e7e058d0734c93549789ba477859 (patch) | |
| tree | fabf24b0b87fdd9be9e9cc43abd4ca91801cd637 /pretyping/evarconv.mli | |
| parent | 223c8ca43cdd5a2615b436ef5faa055b182073ac (diff) | |
Populate the sort constraints set correctly during unification. Add a
[set_eq_sort_variable] for cases where two universes should be equal,
fix [evars_reset_evd] to keep sort constraints and use [whd_sort_var]
directly in [whd_evar].
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@12149 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'pretyping/evarconv.mli')
| -rw-r--r-- | pretyping/evarconv.mli | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/pretyping/evarconv.mli b/pretyping/evarconv.mli index 2a2cd5271..ec4247600 100644 --- a/pretyping/evarconv.mli +++ b/pretyping/evarconv.mli @@ -17,6 +17,9 @@ open Evd (*i*) (* Comparison function considering sort variables. *) +val base_sort_conv : evar_defs -> conv_pb -> + sorts -> sorts -> evar_defs option + val constr_unify_with_sorts : evar_defs -> conv_pb -> types -> types -> bool * evar_defs |