diff options
| author |  msozeau <msozeau@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2011-04-13 14:28:35 +0000 |
|---|---|---|
| committer | msozeau <msozeau@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2011-04-13 14:28:35 +0000 |
| commit | d51c733cb7a3034921fc63a07588e5f0d1e98525 (patch) | |
| tree | 80e53c7a10e2757649bcbe2ee62aa639ff36e4b9 /pretyping/typeclasses.mli | |
| parent | 9369925f8edebf18a7d9cc9516521f193117f3f8 (diff) | |
- Make typeclass transparency information directly available
- Fix pretyping to consider remaining unif problems with the
right transparency information.
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@13996 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'pretyping/typeclasses.mli')
| -rw-r--r-- | pretyping/typeclasses.mli | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/pretyping/typeclasses.mli b/pretyping/typeclasses.mli index 77567bece..69a472cb5 100644 --- a/pretyping/typeclasses.mli +++ b/pretyping/typeclasses.mli @@ -90,6 +90,9 @@ val resolve_one_typeclass : env -> evar_map -> types -> open_constr val register_set_typeclass_transparency : (evaluable_global_reference -> bool (*local?*) -> bool -> unit) -> unit val set_typeclass_transparency : evaluable_global_reference -> bool -> bool -> unit +val register_classes_transparent_state : (unit -> transparent_state) -> unit +val classes_transparent_state : unit -> transparent_state + val register_add_instance_hint : (global_reference -> bool (* local? *) -> int option -> unit) -> unit val register_remove_instance_hint : (global_reference -> unit) -> unit val add_instance_hint : global_reference -> bool -> int option -> unit |