package metaquot

  1. Overview
  2. Docs
OCaml syntax extension for quoting code

Install

dune-project
 Dependency

Authors

Maintainers

Sources

v0.6.0.tar.gz
sha512=9a71062b37f1f54c469e78d1f84f9e2ec38d64ed53964d698db0cbb852a2fa8db3d836215eb49554a577c96f695eaf6a1570a559b9e243181f8689098fe289e1

doc/src/metaquot_ppx/metaquot_ppx.ml.html

Source file metaquot_ppx.ml

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
let mapper = object (self)
  inherit Ppxlib.Ast_traverse.map as super

  method! expression exp =
    Gc.minor (); (* This seems to solve a segfault in OCaml 5.0
      but this is weird!*)
    Metaquot.Exp.lift { expression = super#expression; pattern = super#pattern }
      exp

  method! pattern =
    Metaquot.Pat.lift { expression = super#expression; pattern = super#pattern }
end

let () =
  Ppxlib.Driver.register_transformation "metaquot" ~impl:mapper#structure
OCaml

Innovation. Community. Security.