package ppxlib
Standard infrastructure for ppx rewriters
Install
Dune Dependency
Authors
Maintainers
Sources
ppxlib-0.31.0.tbz
sha256=d21676654e57faa12d7895caffe8703b64521d66efcf152491871a55b2ae41d8
sha512=63f2d327cfc5382476f812670d304aade91b3ea8f10420d6fc9e7078112368d99dbf43dfda9c2c2cf91341b71c37c45c1fe1d54fecde2348560f9d3c48571603
doc/src/ppxlib.astlib/migrate_414_500.ml.html
Source file migrate_414_500.ml
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90module From = Ast_414 module To = Ast_500 (*$ open Astlib_cinaps_helpers $*) (*$ foreach_type (fun _ s -> Printf.printf "let copy_%s\n\ \ : Ast_414.Parsetree.%s -> Ast_500.Parsetree.%s\n\ \ = fun x -> x\n\n" s s s ) *) let copy_structure : Ast_414.Parsetree.structure -> Ast_500.Parsetree.structure = fun x -> x let copy_signature : Ast_414.Parsetree.signature -> Ast_500.Parsetree.signature = fun x -> x let copy_toplevel_phrase : Ast_414.Parsetree.toplevel_phrase -> Ast_500.Parsetree.toplevel_phrase = fun x -> x let copy_core_type : Ast_414.Parsetree.core_type -> Ast_500.Parsetree.core_type = fun x -> x let copy_expression : Ast_414.Parsetree.expression -> Ast_500.Parsetree.expression = fun x -> x let copy_pattern : Ast_414.Parsetree.pattern -> Ast_500.Parsetree.pattern = fun x -> x let copy_case : Ast_414.Parsetree.case -> Ast_500.Parsetree.case = fun x -> x let copy_type_declaration : Ast_414.Parsetree.type_declaration -> Ast_500.Parsetree.type_declaration = fun x -> x let copy_type_extension : Ast_414.Parsetree.type_extension -> Ast_500.Parsetree.type_extension = fun x -> x let copy_extension_constructor : Ast_414.Parsetree.extension_constructor -> Ast_500.Parsetree.extension_constructor = fun x -> x let copy_class_expr : Ast_414.Parsetree.class_expr -> Ast_500.Parsetree.class_expr = fun x -> x let copy_class_field : Ast_414.Parsetree.class_field -> Ast_500.Parsetree.class_field = fun x -> x let copy_class_type : Ast_414.Parsetree.class_type -> Ast_500.Parsetree.class_type = fun x -> x let copy_class_signature : Ast_414.Parsetree.class_signature -> Ast_500.Parsetree.class_signature = fun x -> x let copy_class_type_field : Ast_414.Parsetree.class_type_field -> Ast_500.Parsetree.class_type_field = fun x -> x let copy_module_expr : Ast_414.Parsetree.module_expr -> Ast_500.Parsetree.module_expr = fun x -> x let copy_module_type : Ast_414.Parsetree.module_type -> Ast_500.Parsetree.module_type = fun x -> x let copy_signature_item : Ast_414.Parsetree.signature_item -> Ast_500.Parsetree.signature_item = fun x -> x let copy_structure_item : Ast_414.Parsetree.structure_item -> Ast_500.Parsetree.structure_item = fun x -> x (*$*)