mte/unikernel/duniverse/ppxlib/test/501_migrations/reverse_migrations.ml

10 lines
285 B
OCaml
Raw Normal View History

2025-11-11 02:07:51 +01:00
module Reverse = Ppxlib_ast.Select_ast (Ppxlib_ast__.Versions.OCaml_501)
let () =
let impl str =
Reverse.Of_ocaml.copy_structure @@ Reverse.To_ocaml.copy_structure str
in
Ppxlib.Driver.register_transformation ~impl "reverse_migrations"
let () = Ppxlib.Driver.standalone ()