package ppxlib
sectionYPositions = computeSectionYPositions($el), 10)"
x-init="setTimeout(() => sectionYPositions = computeSectionYPositions($el), 10)"
>
On This Page
Standard infrastructure for ppx rewriters
Install
dune-project
Dependency
Authors
Maintainers
Sources
ppxlib-0.35.0.tbz
sha256=d9d959fc9f84260487e45684dc741898a92fc5506b61a7f5cac65d21832db925
sha512=e428b1e3b89261c7efdaa18016264d1afbf067cb9b0d41124b04796c2487ac7ca8ee9a24a60d56f20d1774cb44aaa9ecf1512f17455812ba8d62d4ef93616ee7
doc/ppxlib/Ppxlib/Ast_traverse/index.html
Module Ppxlib.Ast_traverseSource
This module provides AST traversal classes, such as maps, iterations, folds, etc. on the Parsetree types.
Link to the tutorial
For a detailed explanation on this module, refer to the relevant part of the manual.
API
To use these classes, inherit from them and override the methods corresponding to the types from Parsetree you want to process. For instance to collect all the string constants in a structure:
let string_constants_of =
object
inherit [string list] Ast_traverse.fold as super
method! expression e acc =
let acc = super#expression e acc in
match e.pexp_desc with
| Pexp_constant (Const_string (s, _)) -> s :: acc
| _ -> acc
method! pattern p acc =
let acc = super#pattern p acc in
match p.ppat_desc with
| Ppat_constant (Const_string (s, _)) -> s :: acc
| _ -> acc
end
let string_constants_of_structure = string_constants_of#structureSource
val enter_value :
(Astlib.Ast_500.Parsetree.expression, string Astlib.Location.loc) Attribute.tSource
val enter_module :
(Astlib.Ast_500.Parsetree.module_expr, string Astlib.Location.loc)
Attribute.tSource
val do_not_enter_value_description :
(Astlib.Ast_500.Parsetree.value_description, unit) Attribute.tSource
val do_not_enter_module_declaration :
(Astlib.Ast_500.Parsetree.module_declaration, unit) Attribute.tSource
val do_not_enter_module_type_declaration :
(Astlib.Ast_500.Parsetree.module_type_declaration, unit) Attribute.t sectionYPositions = computeSectionYPositions($el), 10)"
x-init="setTimeout(() => sectionYPositions = computeSectionYPositions($el), 10)"
>
On This Page