package override
module Types = Structure_types
include sig ... end
type item = Types.item
type module_binding = Types.module_binding
type module_expr = Types.module_expr
type contents = item list
type include_declaration = module_expr Ppxlib.Parsetree.include_infos
type item_desc = Ast_definitions(Types).item_desc =
| Extension of Ppxlib.Parsetree.extension * Ppxlib.Parsetree.attributes
| Type of Ppxlib.Asttypes.rec_flag * Ppxlib.Parsetree.type_declaration list
| Module of module_binding
| Modtype of Ppxlib.Parsetree.module_type_declaration
| Include of include_declaration
| Other of item
type wrapped_item = item_desc Ppxlib.Location.loc
type !'a attributed = 'a Ast_definitions(Types).attributed = {
attrs : Ppxlib.Parsetree.attributes;
contents : 'a;
}
val mkattr :
loc:Ppxlib.location ->
?attrs:Ppxlib.Parsetree.attributes ->
'a ->
'a attributed Ppxlib.Location.loc
type module_binding_desc = Ast_definitions(Types).module_binding_desc = {
name : string option Ppxlib.Location.loc;
expr : module_expr;
}
type wrapped_module_binding =
module_binding_desc attributed Ppxlib.Location.loc
type module_expr_desc = Ast_definitions(Types).module_expr_desc =
| Ident of Ppxlib.Longident.t Ppxlib.Location.loc
| Contents of contents
| Functor of Metapp.functor_parameter * module_expr
| Constraint of module_expr Stdcompat.Lazy.t * Ppxlib.Parsetree.module_type
| Other of module_expr
type wrapped_module_expr = module_expr_desc attributed Ppxlib.Location.loc
val empty : unit -> item
val destruct : item -> wrapped_item
val build : wrapped_item -> item
val choose :
(unit -> Ppxlib.Parsetree.structure_item) ->
(unit -> Ppxlib.Parsetree.signature_item) ->
item
val map : Ppxlib.Ast_traverse.map -> contents -> contents
val map_item : Ppxlib.Ast_traverse.map -> item -> item
val format : Stdcompat.Format.formatter -> contents -> unit
val destruct_payload :
loc:Ppxlib.Location.t ->
Ppxlib.Parsetree.payload ->
contents
val destruct_module_binding : module_binding -> wrapped_module_binding
val build_module_binding : wrapped_module_binding -> module_binding
val destruct_module_expr : module_expr -> wrapped_module_expr
val build_module_expr : wrapped_module_expr -> module_expr
val choose_module_expr :
(unit -> Ppxlib.Parsetree.module_expr) ->
(unit -> Ppxlib.Parsetree.module_type) ->
module_expr
val context : item Ppxlib.Extension.Context.t
sectionYPositions = computeSectionYPositions($el), 10)"
x-init="setTimeout(() => sectionYPositions = computeSectionYPositions($el), 10)"
>