module Control:sig..end
type t = {
   | 
mutable minor_heap_size :  | 
(* | The size (in words) of the minor heap. Changing this parameter will trigger a minor collection. Default: 1M. | *) | 
   | 
mutable major_heap_increment :  | 
(* | The minimum number of words to add to the major heap when increasing it. Default: 1M. | *) | 
   | 
mutable space_overhead :  | 
(* | The major GC speed is computed from this parameter.
        This is the memory that will be "wasted" because the GC does not
       immediatly collect unreachable blocks.  It is expressed as a
       percentage of the memory used for live data.
       The GC will work more (use more CPU time and collect
       blocks more eagerly) if space_overhead is smaller.
       Default: 100. | *) | 
   | 
mutable verbose :  | 
(* | This value controls the GC messages on standard error output.
       It is a sum of some of the following flags, to print messages
       on the corresponding events:
  | *) | 
   | 
mutable max_overhead :  | 
(* | Heap compaction is triggered when the estimated amount
       of "wasted" memory is more than max_overhead percent of the
       amount of live data.  If max_overhead is set to 0, heap
       compaction is triggered at the end of each major GC cycle
       (this setting is intended for testing purposes only).
       If max_overhead >= 1000000, compaction is never triggered.
       Default: 500. | *) | 
   | 
mutable stack_limit :  | 
(* | The maximum size of the stack (in words). This is only relevant to the byte-code runtime, as the native code runtime uses the operating system's stack. Default: 256k. | *) | 
   | 
mutable allocation_policy :  | 
(* | The policy used for allocating in the heap. Possible values are 0 and 1. 0 is the next-fit policy, which is quite fast but can result in fragmentation. 1 is the first-fit policy, which can be slower in some cases but can be better for programs with fragmentation problems. Default: 0. | *) | 
val allocation_policy : t -> int
val set_allocation_policy : t -> int -> unit
val stack_limit : t -> int
val set_stack_limit : t -> int -> unit
val max_overhead : t -> int
val set_max_overhead : t -> int -> unit
val verbose : t -> int
val set_verbose : t -> int -> unit
val space_overhead : t -> int
val set_space_overhead : t -> int -> unit
val major_heap_increment : t -> int
val set_major_heap_increment : t -> int -> unit
val minor_heap_size : t -> int
val set_minor_heap_size : t -> int -> unit
module Fields:sig..end
val t_of_sexp : Sexplib.Sexp.t -> t
val sexp_of_t : t -> Sexplib.Sexp.t
val bin_t : t Bin_prot.Type_class.t
val bin_read_t : t Bin_prot.Read.reader
val __bin_read_t__ : (int -> t) Bin_prot.Read.reader
val bin_reader_t : t Bin_prot.Type_class.reader
val bin_size_t : t Bin_prot.Size.sizer
val bin_write_t : t Bin_prot.Write.writer
val bin_writer_t : t Bin_prot.Type_class.writer