diff options
author | msozeau <msozeau@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2008-08-27 15:35:48 +0000 |
---|---|---|
committer | msozeau <msozeau@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2008-08-27 15:35:48 +0000 |
commit | ee7680a6ec45ee7c3367479fecc562aae56c6843 (patch) | |
tree | 34751202adc160badfdd33bda2528a5bbfead0f4 /tactics/auto.mli | |
parent | 76185d638e7a31322a467a3fbd97ac2d30a73bcc (diff) |
Little cleanup in auto.
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@11336 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'tactics/auto.mli')
-rw-r--r-- | tactics/auto.mli | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/tactics/auto.mli b/tactics/auto.mli index 27ecca983..95e6ef3b2 100644 --- a/tactics/auto.mli +++ b/tactics/auto.mli @@ -57,7 +57,6 @@ module Hint_db : val transparent_state : t -> transparent_state val set_transparent_state : t -> transparent_state -> t - val set_rigid : t -> constant -> t end type hint_db_name = string @@ -68,6 +67,11 @@ val searchtable_map : hint_db_name -> hint_db val searchtable_add : (hint_db_name * hint_db) -> unit +(* [create_hint_db local name st use_dn]. + [st] is a transparency state for unification using this db + [use_dn] switches the use of the discrimination net for all hints + and patterns. *) + val create_hint_db : bool -> hint_db_name -> transparent_state -> bool -> unit val current_db_names : unit -> hint_db_name list |