Module Stk.PackerSource

Sourcetype t = {
  1. min : int;
  2. max : int;
  3. mutable expand : int;
  4. mutable current : int;
  5. mutable fixed : bool;
}
Sourceval init : ((< id : Stk.Oid.Map.key.. > as 'a) -> int) -> ('a -> int option) -> ('a -> int) -> 'a list -> int * t Stk.Oid.Map.t
Sourceval fix : Oid.t -> t -> unit
Sourceval shrink_or_expand : parts:int -> remain:int -> t Stk.Oid.Map.t -> bool * int * int
Sourceval debug_m : t Stk.Oid.Map.t -> unit
Sourceval compute_remain : int -> t Stk.Oid.Map.t -> bool * int * int
Sourceval compute : int -> (Widget.widget -> int) -> (Widget.widget -> int option) -> (Widget.widget -> int) -> Widget.widget list -> t Stk.Oid.Map.t