Gestion en temps constant de la pile des Unfo

git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@4560 85f007b7-540e-0410-9357-904b9bb8a0f7

1 files changed, 3 insertions, 5 deletions

diff --git a/lib/bstack.mli b/lib/bstack.mli
index febf7850ed..4f8ba95c44 100644
--- a/lib/bstack.mli
+++ b/lib/bstack.mli
@@ -12,12 +12,10 @@
 
 type 'a t
 
-val create : int option -> 'a t
-val set_depth : 'a t -> int option -> unit
+val create : int -> 'a -> 'a t
 val push : 'a t -> 'a -> unit
 val app_push : 'a t -> ('a -> 'a) -> unit
 val app_repl : 'a t -> ('a -> 'a) -> unit
-val pop : 'a t -> 'a option
-val top : 'a t -> 'a option
-val is_empty : 'a t -> bool
+val pop : 'a t -> unit
+val top : 'a t -> 'a
 val depth : 'a t -> int