aboutsummaryrefslogtreecommitdiffhomepage
path: root/tactics/dn.mli
diff options
context:
space:
mode:
authorGravatar glondu <glondu@85f007b7-540e-0410-9357-904b9bb8a0f7>2009-09-17 15:58:14 +0000
committerGravatar glondu <glondu@85f007b7-540e-0410-9357-904b9bb8a0f7>2009-09-17 15:58:14 +0000
commit61ccbc81a2f3b4662ed4a2bad9d07d2003dda3a2 (patch)
tree961cc88c714aa91a0276ea9fbf8bc53b2b9d5c28 /tactics/dn.mli
parent6d3fbdf36c6a47b49c2a4b16f498972c93c07574 (diff)
Delete trailing whitespaces in all *.{v,ml*} files
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@12337 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'tactics/dn.mli')
-rw-r--r--tactics/dn.mli4
1 files changed, 2 insertions, 2 deletions
diff --git a/tactics/dn.mli b/tactics/dn.mli
index e37ed9af3..b4b2e6c89 100644
--- a/tactics/dn.mli
+++ b/tactics/dn.mli
@@ -25,11 +25,11 @@ val create : unit -> ('lbl,'pat,'inf) t
val add : ('lbl,'pat,'inf) t -> ('lbl,'pat) decompose_fun -> 'pat * 'inf
-> ('lbl,'pat,'inf) t
-val rmv : ('lbl,'pat,'inf) t -> ('lbl,'pat) decompose_fun -> 'pat * 'inf
+val rmv : ('lbl,'pat,'inf) t -> ('lbl,'pat) decompose_fun -> 'pat * 'inf
-> ('lbl,'pat,'inf) t
type 'res lookup_res = Label of 'res | Nothing | Everything
-
+
type ('lbl,'tree) lookup_fun = 'tree -> ('lbl * 'tree list) lookup_res
(* [lookup t f tree] looks for trees (and their associated