package ocaml-base-compiler
type class_element = Odoc_class.class_element =
| Class_attribute of Value.t_attribute
| Class_method of Value.t_method
| Class_comment of text
and class_apply = Odoc_class.class_apply = {
capp_name : Name.t;
mutable capp_class : t_class option;
capp_params : Types.type_expr list;
capp_params_code : string list;
}
and class_constr = Odoc_class.class_constr = {
cco_name : Name.t;
mutable cco_class : cct option;
cco_type_parameters : Types.type_expr list;
}
and class_kind = Odoc_class.class_kind =
| Class_structure of inherited_class list * class_element list
| Class_apply of class_apply
| Class_constr of class_constr
| Class_constraint of class_kind * class_type_kind
and t_class = Odoc_class.t_class = {
cl_name : Name.t;
mutable cl_info : info option;
cl_type : Types.class_type;
cl_type_parameters : Types.type_expr list;
cl_virtual : bool;
mutable cl_kind : class_kind;
mutable cl_parameters : Parameter.parameter list;
mutable cl_loc : location;
}
and class_type_alias = Odoc_class.class_type_alias = {
cta_name : Name.t;
mutable cta_class : cct option;
cta_type_parameters : Types.type_expr list;
}
and class_type_kind = Odoc_class.class_type_kind =
| Class_signature of inherited_class list * class_element list
| Class_type of class_type_alias
and t_class_type = Odoc_class.t_class_type = {
clt_name : Name.t;
mutable clt_info : info option;
clt_type : Types.class_type;
clt_type_parameters : Types.type_expr list;
clt_virtual : bool;
mutable clt_kind : class_type_kind;
mutable clt_loc : location;
}
val class_elements : ?trans:bool -> t_class -> class_element list
val class_attributes : ?trans:bool -> t_class -> Value.t_attribute list
val class_methods : ?trans:bool -> t_class -> Value.t_method list
val class_type_elements : ?trans:bool -> t_class_type -> class_element list
val class_type_attributes :
?trans:bool ->
t_class_type ->
Value.t_attribute list
val class_type_parameter_text_by_name : t_class_type -> string -> text option
val class_type_methods : ?trans:bool -> t_class_type -> Value.t_method list
val class_type_comments : ?trans:bool -> t_class_type -> text list
sectionYPositions = computeSectionYPositions($el), 10)" x-init="setTimeout(() => sectionYPositions = computeSectionYPositions($el), 10)">