sig
type t
val ty : t Type.t
val name : string
val descr : t Descr.t
val packed_descr : Structural_descr.pack
val reprs : t list
val equal : t -> t -> bool
val compare : t -> t -> int
val hash : t -> int
val pretty_code : Format.formatter -> t -> unit
val internal_pretty_code : Type.precedence -> Format.formatter -> t -> unit
val pretty : Format.formatter -> t -> unit
val varname : t -> string
val mem_project : (Project_skeleton.t -> bool) -> t -> bool
val copy : t -> t
type key
type data
val create : int -> t
val add :
t -> string -> Dashtbl.S.key -> State.t list -> Dashtbl.S.data -> unit
val replace :
reset:bool ->
t -> string -> Dashtbl.S.key -> State.t list -> Dashtbl.S.data -> unit
val memo :
reset:bool ->
(Dashtbl.S.data list -> Dashtbl.S.data) ->
t -> string -> Dashtbl.S.key -> State.t list -> Dashtbl.S.data
val clear : reset:bool -> t -> unit
val remove : reset:bool -> t -> Dashtbl.S.key -> State.t -> unit
val remove_all : reset:bool -> t -> Dashtbl.S.key -> unit
val filter :
reset:bool ->
(Dashtbl.S.key -> State.t option -> Dashtbl.S.data -> bool) ->
t -> Dashtbl.S.key -> unit
val mem : t -> Dashtbl.S.key -> bool
val is_local : t -> State.t -> bool
val find :
?who:State.t list ->
t -> Dashtbl.S.key -> State.t -> Dashtbl.S.data * State.t
val find_key : t -> State.t -> (Dashtbl.S.key * State.t) list
val find_data :
?who:State.t list -> t -> Dashtbl.S.key -> State.t -> Dashtbl.S.data
val find_state :
?who:State.t list -> t -> Dashtbl.S.key -> State.t -> State.t
val find_all_local :
?who:State.t list ->
t -> Dashtbl.S.key -> State.t -> (Dashtbl.S.data * State.t) list
val find_all_local_data :
?who:State.t list -> t -> Dashtbl.S.key -> State.t -> Dashtbl.S.data list
val find_all_local_states :
?who:State.t list -> t -> Dashtbl.S.key -> State.t -> State.t list
val find_all :
?who:State.t list ->
t -> Dashtbl.S.key -> (Dashtbl.S.data * State.t) list
val find_all_data :
?who:State.t list -> t -> Dashtbl.S.key -> Dashtbl.S.data list
val find_all_states :
?who:State.t list -> t -> Dashtbl.S.key -> State.t list
val iter :
(Dashtbl.S.key -> State.t option -> Dashtbl.S.data * State.t -> unit) ->
t -> unit
val iter_key :
(State.t option -> Dashtbl.S.data * State.t -> unit) ->
t -> Dashtbl.S.key -> unit
val fold :
(Dashtbl.S.key -> State.t option -> Dashtbl.S.data * State.t -> 'a -> 'a) ->
t -> 'a -> 'a
val fold_key :
(State.t option -> Dashtbl.S.data * State.t -> 'a -> 'a) ->
t -> Dashtbl.S.key -> 'a -> 'a
val length : t -> int
type marshaled
val marshaler : (t -> Dashtbl.S.marshaled) * (Dashtbl.S.marshaled -> t)
end