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