package jenga

  1. Overview
  2. Docs
Legend:
Library
Module
Module type
Parameter
Class
Class type
val iter : t -> j_number: (([< `Read | `Set_and_create ], t, int) Fieldslib.Field.t_with_perm -> t -> int -> 'a) -> f_number: (([< `Read | `Set_and_create ], t, int) Fieldslib.Field.t_with_perm -> t -> int -> 'b) -> d_number: (([< `Read | `Set_and_create ], t, int) Fieldslib.Field.t_with_perm -> t -> int -> 'c) -> tenacious_concurrency: (([< `Read | `Set_and_create ], t, int option) Fieldslib.Field.t_with_perm -> t -> int option -> 'd) -> stop_on_first_error: (([< `Read | `Set_and_create ], t, bool) Fieldslib.Field.t_with_perm -> t -> bool -> 'e) -> poll_forever: (([< `Read | `Set_and_create ], t, bool) Fieldslib.Field.t_with_perm -> t -> bool -> 'f) -> verbose: (([< `Read | `Set_and_create ], t, bool) Fieldslib.Field.t_with_perm -> t -> bool -> 'g) -> show_memory_allocations: (([< `Read | `Set_and_create ], t, bool) Fieldslib.Field.t_with_perm -> t -> bool -> 'h) -> show_actions_run: (([< `Read | `Set_and_create ], t, bool) Fieldslib.Field.t_with_perm -> t -> bool -> 'i) -> show_actions_run_verbose: (([< `Read | `Set_and_create ], t, bool) Fieldslib.Field.t_with_perm -> t -> bool -> 'j) -> show_checked: (([< `Read | `Set_and_create ], t, bool) Fieldslib.Field.t_with_perm -> t -> bool -> 'k) -> show_reflecting: (([< `Read | `Set_and_create ], t, bool) Fieldslib.Field.t_with_perm -> t -> bool -> 'l) -> show_considering: (([< `Read | `Set_and_create ], t, bool) Fieldslib.Field.t_with_perm -> t -> bool -> 'm) -> show_reconsidering: (([< `Read | `Set_and_create ], t, bool) Fieldslib.Field.t_with_perm -> t -> bool -> 'n) -> show_trace_messages: (([< `Read | `Set_and_create ], t, bool) Fieldslib.Field.t_with_perm -> t -> bool -> 'o) -> show_error_dependency_paths: (([< `Read | `Set_and_create ], t, bool) Fieldslib.Field.t_with_perm -> t -> bool -> 'p) -> prefix_time: (([< `Read | `Set_and_create ], t, bool) Fieldslib.Field.t_with_perm -> t -> bool -> 'q) -> report_long_cycle_times: (([< `Read | `Set_and_create ], t, Core.Time.Span.t option) Fieldslib.Field.t_with_perm -> t -> Core.Time.Span.t option -> 'r) -> progress: (([< `Read | `Set_and_create ], t, bool) Fieldslib.Field.t_with_perm -> t -> bool -> 's) -> dont_emit_kill_line: (([< `Read | `Set_and_create ], t, bool) Fieldslib.Field.t_with_perm -> t -> bool -> 't) -> path_to_jenga_conf: (([< `Read | `Set_and_create ], t, string option) Fieldslib.Field.t_with_perm -> t -> string option -> 'u) -> brief_error_summary: (([< `Read | `Set_and_create ], t, bool) Fieldslib.Field.t_with_perm -> t -> bool -> 'v) -> no_server: (([< `Read | `Set_and_create ], t, bool) Fieldslib.Field.t_with_perm -> t -> bool -> 'w) -> goals: (([< `Read | `Set_and_create ], t, string list) Fieldslib.Field.t_with_perm -> t -> string list -> 'x) -> no_notifiers: (([< `Read | `Set_and_create ], t, bool) Fieldslib.Field.t_with_perm -> t -> bool -> 'y) -> no_fs_triggers: (([< `Read | `Set_and_create ], t, bool) Fieldslib.Field.t_with_perm -> t -> bool -> 'z) -> sandbox_actions: (([< `Read | `Set_and_create ], t, Db.Sandbox_kind.t) Fieldslib.Field.t_with_perm -> t -> Db.Sandbox_kind.t -> 'a1) -> gc: (([< `Read | `Set_and_create ], t, Gc.t) Fieldslib.Field.t_with_perm -> t -> Gc.t -> 'b1) -> 'b1
val fold : t -> init:'a -> j_number: ('a -> ([< `Read | `Set_and_create ], t, int) Fieldslib.Field.t_with_perm -> t -> int -> 'b) -> f_number: ('b -> ([< `Read | `Set_and_create ], t, int) Fieldslib.Field.t_with_perm -> t -> int -> 'c) -> d_number: ('c -> ([< `Read | `Set_and_create ], t, int) Fieldslib.Field.t_with_perm -> t -> int -> 'd) -> tenacious_concurrency: ('d -> ([< `Read | `Set_and_create ], t, int option) Fieldslib.Field.t_with_perm -> t -> int option -> 'e) -> stop_on_first_error: ('e -> ([< `Read | `Set_and_create ], t, bool) Fieldslib.Field.t_with_perm -> t -> bool -> 'f) -> poll_forever: ('f -> ([< `Read | `Set_and_create ], t, bool) Fieldslib.Field.t_with_perm -> t -> bool -> 'g) -> verbose: ('g -> ([< `Read | `Set_and_create ], t, bool) Fieldslib.Field.t_with_perm -> t -> bool -> 'h) -> show_memory_allocations: ('h -> ([< `Read | `Set_and_create ], t, bool) Fieldslib.Field.t_with_perm -> t -> bool -> 'i) -> show_actions_run: ('i -> ([< `Read | `Set_and_create ], t, bool) Fieldslib.Field.t_with_perm -> t -> bool -> 'j) -> show_actions_run_verbose: ('j -> ([< `Read | `Set_and_create ], t, bool) Fieldslib.Field.t_with_perm -> t -> bool -> 'k) -> show_checked: ('k -> ([< `Read | `Set_and_create ], t, bool) Fieldslib.Field.t_with_perm -> t -> bool -> 'l) -> show_reflecting: ('l -> ([< `Read | `Set_and_create ], t, bool) Fieldslib.Field.t_with_perm -> t -> bool -> 'm) -> show_considering: ('m -> ([< `Read | `Set_and_create ], t, bool) Fieldslib.Field.t_with_perm -> t -> bool -> 'n) -> show_reconsidering: ('n -> ([< `Read | `Set_and_create ], t, bool) Fieldslib.Field.t_with_perm -> t -> bool -> 'o) -> show_trace_messages: ('o -> ([< `Read | `Set_and_create ], t, bool) Fieldslib.Field.t_with_perm -> t -> bool -> 'p) -> show_error_dependency_paths: ('p -> ([< `Read | `Set_and_create ], t, bool) Fieldslib.Field.t_with_perm -> t -> bool -> 'q) -> prefix_time: ('q -> ([< `Read | `Set_and_create ], t, bool) Fieldslib.Field.t_with_perm -> t -> bool -> 'r) -> report_long_cycle_times: ('r -> ([< `Read | `Set_and_create ], t, Core.Time.Span.t option) Fieldslib.Field.t_with_perm -> t -> Core.Time.Span.t option -> 's) -> progress: ('s -> ([< `Read | `Set_and_create ], t, bool) Fieldslib.Field.t_with_perm -> t -> bool -> 't) -> dont_emit_kill_line: ('t -> ([< `Read | `Set_and_create ], t, bool) Fieldslib.Field.t_with_perm -> t -> bool -> 'u) -> path_to_jenga_conf: ('u -> ([< `Read | `Set_and_create ], t, string option) Fieldslib.Field.t_with_perm -> t -> string option -> 'v) -> brief_error_summary: ('v -> ([< `Read | `Set_and_create ], t, bool) Fieldslib.Field.t_with_perm -> t -> bool -> 'w) -> no_server: ('w -> ([< `Read | `Set_and_create ], t, bool) Fieldslib.Field.t_with_perm -> t -> bool -> 'x) -> goals: ('x -> ([< `Read | `Set_and_create ], t, string list) Fieldslib.Field.t_with_perm -> t -> string list -> 'y) -> no_notifiers: ('y -> ([< `Read | `Set_and_create ], t, bool) Fieldslib.Field.t_with_perm -> t -> bool -> 'z) -> no_fs_triggers: ('z -> ([< `Read | `Set_and_create ], t, bool) Fieldslib.Field.t_with_perm -> t -> bool -> 'a1) -> sandbox_actions: ('a1 -> ([< `Read | `Set_and_create ], t, Db.Sandbox_kind.t) Fieldslib.Field.t_with_perm -> t -> Db.Sandbox_kind.t -> 'b1) -> gc: ('b1 -> ([< `Read | `Set_and_create ], t, Gc.t) Fieldslib.Field.t_with_perm -> t -> Gc.t -> 'c1) -> 'c1
val for_all : t -> j_number: (([< `Read | `Set_and_create ], t, int) Fieldslib.Field.t_with_perm -> t -> int -> bool) -> f_number: (([< `Read | `Set_and_create ], t, int) Fieldslib.Field.t_with_perm -> t -> int -> bool) -> d_number: (([< `Read | `Set_and_create ], t, int) Fieldslib.Field.t_with_perm -> t -> int -> bool) -> tenacious_concurrency: (([< `Read | `Set_and_create ], t, int option) Fieldslib.Field.t_with_perm -> t -> int option -> bool) -> stop_on_first_error: (([< `Read | `Set_and_create ], t, bool) Fieldslib.Field.t_with_perm -> t -> bool -> bool) -> poll_forever: (([< `Read | `Set_and_create ], t, bool) Fieldslib.Field.t_with_perm -> t -> bool -> bool) -> verbose: (([< `Read | `Set_and_create ], t, bool) Fieldslib.Field.t_with_perm -> t -> bool -> bool) -> show_memory_allocations: (([< `Read | `Set_and_create ], t, bool) Fieldslib.Field.t_with_perm -> t -> bool -> bool) -> show_actions_run: (([< `Read | `Set_and_create ], t, bool) Fieldslib.Field.t_with_perm -> t -> bool -> bool) -> show_actions_run_verbose: (([< `Read | `Set_and_create ], t, bool) Fieldslib.Field.t_with_perm -> t -> bool -> bool) -> show_checked: (([< `Read | `Set_and_create ], t, bool) Fieldslib.Field.t_with_perm -> t -> bool -> bool) -> show_reflecting: (([< `Read | `Set_and_create ], t, bool) Fieldslib.Field.t_with_perm -> t -> bool -> bool) -> show_considering: (([< `Read | `Set_and_create ], t, bool) Fieldslib.Field.t_with_perm -> t -> bool -> bool) -> show_reconsidering: (([< `Read | `Set_and_create ], t, bool) Fieldslib.Field.t_with_perm -> t -> bool -> bool) -> show_trace_messages: (([< `Read | `Set_and_create ], t, bool) Fieldslib.Field.t_with_perm -> t -> bool -> bool) -> show_error_dependency_paths: (([< `Read | `Set_and_create ], t, bool) Fieldslib.Field.t_with_perm -> t -> bool -> bool) -> prefix_time: (([< `Read | `Set_and_create ], t, bool) Fieldslib.Field.t_with_perm -> t -> bool -> bool) -> report_long_cycle_times: (([< `Read | `Set_and_create ], t, Core.Time.Span.t option) Fieldslib.Field.t_with_perm -> t -> Core.Time.Span.t option -> bool) -> progress: (([< `Read | `Set_and_create ], t, bool) Fieldslib.Field.t_with_perm -> t -> bool -> bool) -> dont_emit_kill_line: (([< `Read | `Set_and_create ], t, bool) Fieldslib.Field.t_with_perm -> t -> bool -> bool) -> path_to_jenga_conf: (([< `Read | `Set_and_create ], t, string option) Fieldslib.Field.t_with_perm -> t -> string option -> bool) -> brief_error_summary: (([< `Read | `Set_and_create ], t, bool) Fieldslib.Field.t_with_perm -> t -> bool -> bool) -> no_server: (([< `Read | `Set_and_create ], t, bool) Fieldslib.Field.t_with_perm -> t -> bool -> bool) -> goals: (([< `Read | `Set_and_create ], t, string list) Fieldslib.Field.t_with_perm -> t -> string list -> bool) -> no_notifiers: (([< `Read | `Set_and_create ], t, bool) Fieldslib.Field.t_with_perm -> t -> bool -> bool) -> no_fs_triggers: (([< `Read | `Set_and_create ], t, bool) Fieldslib.Field.t_with_perm -> t -> bool -> bool) -> sandbox_actions: (([< `Read | `Set_and_create ], t, Db.Sandbox_kind.t) Fieldslib.Field.t_with_perm -> t -> Db.Sandbox_kind.t -> bool) -> gc: (([< `Read | `Set_and_create ], t, Gc.t) Fieldslib.Field.t_with_perm -> t -> Gc.t -> bool) -> bool
val exists : t -> j_number: (([< `Read | `Set_and_create ], t, int) Fieldslib.Field.t_with_perm -> t -> int -> bool) -> f_number: (([< `Read | `Set_and_create ], t, int) Fieldslib.Field.t_with_perm -> t -> int -> bool) -> d_number: (([< `Read | `Set_and_create ], t, int) Fieldslib.Field.t_with_perm -> t -> int -> bool) -> tenacious_concurrency: (([< `Read | `Set_and_create ], t, int option) Fieldslib.Field.t_with_perm -> t -> int option -> bool) -> stop_on_first_error: (([< `Read | `Set_and_create ], t, bool) Fieldslib.Field.t_with_perm -> t -> bool -> bool) -> poll_forever: (([< `Read | `Set_and_create ], t, bool) Fieldslib.Field.t_with_perm -> t -> bool -> bool) -> verbose: (([< `Read | `Set_and_create ], t, bool) Fieldslib.Field.t_with_perm -> t -> bool -> bool) -> show_memory_allocations: (([< `Read | `Set_and_create ], t, bool) Fieldslib.Field.t_with_perm -> t -> bool -> bool) -> show_actions_run: (([< `Read | `Set_and_create ], t, bool) Fieldslib.Field.t_with_perm -> t -> bool -> bool) -> show_actions_run_verbose: (([< `Read | `Set_and_create ], t, bool) Fieldslib.Field.t_with_perm -> t -> bool -> bool) -> show_checked: (([< `Read | `Set_and_create ], t, bool) Fieldslib.Field.t_with_perm -> t -> bool -> bool) -> show_reflecting: (([< `Read | `Set_and_create ], t, bool) Fieldslib.Field.t_with_perm -> t -> bool -> bool) -> show_considering: (([< `Read | `Set_and_create ], t, bool) Fieldslib.Field.t_with_perm -> t -> bool -> bool) -> show_reconsidering: (([< `Read | `Set_and_create ], t, bool) Fieldslib.Field.t_with_perm -> t -> bool -> bool) -> show_trace_messages: (([< `Read | `Set_and_create ], t, bool) Fieldslib.Field.t_with_perm -> t -> bool -> bool) -> show_error_dependency_paths: (([< `Read | `Set_and_create ], t, bool) Fieldslib.Field.t_with_perm -> t -> bool -> bool) -> prefix_time: (([< `Read | `Set_and_create ], t, bool) Fieldslib.Field.t_with_perm -> t -> bool -> bool) -> report_long_cycle_times: (([< `Read | `Set_and_create ], t, Core.Time.Span.t option) Fieldslib.Field.t_with_perm -> t -> Core.Time.Span.t option -> bool) -> progress: (([< `Read | `Set_and_create ], t, bool) Fieldslib.Field.t_with_perm -> t -> bool -> bool) -> dont_emit_kill_line: (([< `Read | `Set_and_create ], t, bool) Fieldslib.Field.t_with_perm -> t -> bool -> bool) -> path_to_jenga_conf: (([< `Read | `Set_and_create ], t, string option) Fieldslib.Field.t_with_perm -> t -> string option -> bool) -> brief_error_summary: (([< `Read | `Set_and_create ], t, bool) Fieldslib.Field.t_with_perm -> t -> bool -> bool) -> no_server: (([< `Read | `Set_and_create ], t, bool) Fieldslib.Field.t_with_perm -> t -> bool -> bool) -> goals: (([< `Read | `Set_and_create ], t, string list) Fieldslib.Field.t_with_perm -> t -> string list -> bool) -> no_notifiers: (([< `Read | `Set_and_create ], t, bool) Fieldslib.Field.t_with_perm -> t -> bool -> bool) -> no_fs_triggers: (([< `Read | `Set_and_create ], t, bool) Fieldslib.Field.t_with_perm -> t -> bool -> bool) -> sandbox_actions: (([< `Read | `Set_and_create ], t, Db.Sandbox_kind.t) Fieldslib.Field.t_with_perm -> t -> Db.Sandbox_kind.t -> bool) -> gc: (([< `Read | `Set_and_create ], t, Gc.t) Fieldslib.Field.t_with_perm -> t -> Gc.t -> bool) -> bool
val to_list : t -> j_number: (([< `Read | `Set_and_create ], t, int) Fieldslib.Field.t_with_perm -> t -> int -> 'a) -> f_number: (([< `Read | `Set_and_create ], t, int) Fieldslib.Field.t_with_perm -> t -> int -> 'a) -> d_number: (([< `Read | `Set_and_create ], t, int) Fieldslib.Field.t_with_perm -> t -> int -> 'a) -> tenacious_concurrency: (([< `Read | `Set_and_create ], t, int option) Fieldslib.Field.t_with_perm -> t -> int option -> 'a) -> stop_on_first_error: (([< `Read | `Set_and_create ], t, bool) Fieldslib.Field.t_with_perm -> t -> bool -> 'a) -> poll_forever: (([< `Read | `Set_and_create ], t, bool) Fieldslib.Field.t_with_perm -> t -> bool -> 'a) -> verbose: (([< `Read | `Set_and_create ], t, bool) Fieldslib.Field.t_with_perm -> t -> bool -> 'a) -> show_memory_allocations: (([< `Read | `Set_and_create ], t, bool) Fieldslib.Field.t_with_perm -> t -> bool -> 'a) -> show_actions_run: (([< `Read | `Set_and_create ], t, bool) Fieldslib.Field.t_with_perm -> t -> bool -> 'a) -> show_actions_run_verbose: (([< `Read | `Set_and_create ], t, bool) Fieldslib.Field.t_with_perm -> t -> bool -> 'a) -> show_checked: (([< `Read | `Set_and_create ], t, bool) Fieldslib.Field.t_with_perm -> t -> bool -> 'a) -> show_reflecting: (([< `Read | `Set_and_create ], t, bool) Fieldslib.Field.t_with_perm -> t -> bool -> 'a) -> show_considering: (([< `Read | `Set_and_create ], t, bool) Fieldslib.Field.t_with_perm -> t -> bool -> 'a) -> show_reconsidering: (([< `Read | `Set_and_create ], t, bool) Fieldslib.Field.t_with_perm -> t -> bool -> 'a) -> show_trace_messages: (([< `Read | `Set_and_create ], t, bool) Fieldslib.Field.t_with_perm -> t -> bool -> 'a) -> show_error_dependency_paths: (([< `Read | `Set_and_create ], t, bool) Fieldslib.Field.t_with_perm -> t -> bool -> 'a) -> prefix_time: (([< `Read | `Set_and_create ], t, bool) Fieldslib.Field.t_with_perm -> t -> bool -> 'a) -> report_long_cycle_times: (([< `Read | `Set_and_create ], t, Core.Time.Span.t option) Fieldslib.Field.t_with_perm -> t -> Core.Time.Span.t option -> 'a) -> progress: (([< `Read | `Set_and_create ], t, bool) Fieldslib.Field.t_with_perm -> t -> bool -> 'a) -> dont_emit_kill_line: (([< `Read | `Set_and_create ], t, bool) Fieldslib.Field.t_with_perm -> t -> bool -> 'a) -> path_to_jenga_conf: (([< `Read | `Set_and_create ], t, string option) Fieldslib.Field.t_with_perm -> t -> string option -> 'a) -> brief_error_summary: (([< `Read | `Set_and_create ], t, bool) Fieldslib.Field.t_with_perm -> t -> bool -> 'a) -> no_server: (([< `Read | `Set_and_create ], t, bool) Fieldslib.Field.t_with_perm -> t -> bool -> 'a) -> goals: (([< `Read | `Set_and_create ], t, string list) Fieldslib.Field.t_with_perm -> t -> string list -> 'a) -> no_notifiers: (([< `Read | `Set_and_create ], t, bool) Fieldslib.Field.t_with_perm -> t -> bool -> 'a) -> no_fs_triggers: (([< `Read | `Set_and_create ], t, bool) Fieldslib.Field.t_with_perm -> t -> bool -> 'a) -> sandbox_actions: (([< `Read | `Set_and_create ], t, Db.Sandbox_kind.t) Fieldslib.Field.t_with_perm -> t -> Db.Sandbox_kind.t -> 'a) -> gc: (([< `Read | `Set_and_create ], t, Gc.t) Fieldslib.Field.t_with_perm -> t -> Gc.t -> 'a) -> 'a list
val map : t -> j_number: (([< `Read | `Set_and_create ], t, int) Fieldslib.Field.t_with_perm -> t -> int -> int) -> f_number: (([< `Read | `Set_and_create ], t, int) Fieldslib.Field.t_with_perm -> t -> int -> int) -> d_number: (([< `Read | `Set_and_create ], t, int) Fieldslib.Field.t_with_perm -> t -> int -> int) -> tenacious_concurrency: (([< `Read | `Set_and_create ], t, int option) Fieldslib.Field.t_with_perm -> t -> int option -> int option) -> stop_on_first_error: (([< `Read | `Set_and_create ], t, bool) Fieldslib.Field.t_with_perm -> t -> bool -> bool) -> poll_forever: (([< `Read | `Set_and_create ], t, bool) Fieldslib.Field.t_with_perm -> t -> bool -> bool) -> verbose: (([< `Read | `Set_and_create ], t, bool) Fieldslib.Field.t_with_perm -> t -> bool -> bool) -> show_memory_allocations: (([< `Read | `Set_and_create ], t, bool) Fieldslib.Field.t_with_perm -> t -> bool -> bool) -> show_actions_run: (([< `Read | `Set_and_create ], t, bool) Fieldslib.Field.t_with_perm -> t -> bool -> bool) -> show_actions_run_verbose: (([< `Read | `Set_and_create ], t, bool) Fieldslib.Field.t_with_perm -> t -> bool -> bool) -> show_checked: (([< `Read | `Set_and_create ], t, bool) Fieldslib.Field.t_with_perm -> t -> bool -> bool) -> show_reflecting: (([< `Read | `Set_and_create ], t, bool) Fieldslib.Field.t_with_perm -> t -> bool -> bool) -> show_considering: (([< `Read | `Set_and_create ], t, bool) Fieldslib.Field.t_with_perm -> t -> bool -> bool) -> show_reconsidering: (([< `Read | `Set_and_create ], t, bool) Fieldslib.Field.t_with_perm -> t -> bool -> bool) -> show_trace_messages: (([< `Read | `Set_and_create ], t, bool) Fieldslib.Field.t_with_perm -> t -> bool -> bool) -> show_error_dependency_paths: (([< `Read | `Set_and_create ], t, bool) Fieldslib.Field.t_with_perm -> t -> bool -> bool) -> prefix_time: (([< `Read | `Set_and_create ], t, bool) Fieldslib.Field.t_with_perm -> t -> bool -> bool) -> report_long_cycle_times: (([< `Read | `Set_and_create ], t, Core.Time.Span.t option) Fieldslib.Field.t_with_perm -> t -> Core.Time.Span.t option -> Core.Time.Span.t option) -> progress: (([< `Read | `Set_and_create ], t, bool) Fieldslib.Field.t_with_perm -> t -> bool -> bool) -> dont_emit_kill_line: (([< `Read | `Set_and_create ], t, bool) Fieldslib.Field.t_with_perm -> t -> bool -> bool) -> path_to_jenga_conf: (([< `Read | `Set_and_create ], t, string option) Fieldslib.Field.t_with_perm -> t -> string option -> string option) -> brief_error_summary: (([< `Read | `Set_and_create ], t, bool) Fieldslib.Field.t_with_perm -> t -> bool -> bool) -> no_server: (([< `Read | `Set_and_create ], t, bool) Fieldslib.Field.t_with_perm -> t -> bool -> bool) -> goals: (([< `Read | `Set_and_create ], t, string list) Fieldslib.Field.t_with_perm -> t -> string list -> string list) -> no_notifiers: (([< `Read | `Set_and_create ], t, bool) Fieldslib.Field.t_with_perm -> t -> bool -> bool) -> no_fs_triggers: (([< `Read | `Set_and_create ], t, bool) Fieldslib.Field.t_with_perm -> t -> bool -> bool) -> sandbox_actions: (([< `Read | `Set_and_create ], t, Db.Sandbox_kind.t) Fieldslib.Field.t_with_perm -> t -> Db.Sandbox_kind.t -> Db.Sandbox_kind.t) -> gc: (([< `Read | `Set_and_create ], t, Gc.t) Fieldslib.Field.t_with_perm -> t -> Gc.t -> Gc.t) -> t
val set_all_mutable_fields : 'a -> unit