sig
module Stdlib :
sig
val compare : 'a -> 'a -> int
val succ : int -> int
val incr : int Pervasives.ref -> unit
val min : 'a -> 'a -> 'a
val max : 'a -> 'a -> 'a
val min_int : int
val max_int : int
end
module Dynlink : sig val init : unit -> unit end
module Float : sig val max_float : float end
module Format :
sig
type stag
val string_of_stag : Transitioning.Format.stag -> string
val stag_of_string : string -> Transitioning.Format.stag
type formatter_stag_functions = {
mark_open_stag : Transitioning.Format.stag -> string;
mark_close_stag : Transitioning.Format.stag -> string;
print_open_stag : Transitioning.Format.stag -> unit;
print_close_stag : Transitioning.Format.stag -> unit;
}
val pp_set_formatter_stag_functions :
Format.formatter ->
Transitioning.Format.formatter_stag_functions -> unit
val pp_get_formatter_stag_functions :
Format.formatter ->
unit -> Transitioning.Format.formatter_stag_functions
val pp_open_stag :
Format.formatter -> Transitioning.Format.stag -> unit
val pp_close_stag : Format.formatter -> unit -> unit
end
module Q : sig val to_float : Q.t -> float end
end