Up
module
Flat_queue_debug
:
sig
#
module
Debug :
functor
(Flat_queue :
module type of
Flat_queue
)
->
sig
include
module type of
Flat_queue
#
val
check_invariant : bool
Pervasives
.
ref
#
val
show_messages : bool
Pervasives
.
ref
end
end