package ppx_driver
Install
Dune Dependency
Authors
Maintainers
Sources
sha256=4a267025c68b7960c33c031daa06534ce5bf0fe9e43debe624ee7dd44c6ef08d
md5=f1c47250f6831fda1791403e4f02613a
Description
Part of the Jane Street's PPX rewriters collection.
Published: 15 Mar 2018
README
ppx_driver - driver for AST transformers
A driver is an executable created from a set of OCaml AST transformers linked together with a command line frontend.
The aim is to provide a tool that can be used to:
easily view the pre-processed version of a file, no need to construct a complex command line:
ppx file.ml
will douse a single executable to run several transformations: no need to fork many times just for pre-processing
improved errors for misspelled/misplaced attributes and extension points
Using Ppx_driver based rewriters
The recommended way to use rewriters based on Ppx_driver is through jbuilder. All you need to is add this line to your (library ...)
or (executables ...)
stanza:
(preprocess (pps (rewriter1 rewriter2 ... ppx_driver.runner)))
jbuilder will automatically build a static driver including all these rewriters. Note the ppx_driver.runner
at the end of the list, it will still work if you don't put but some specific features of ppx_driver won't be available.
If you are not using jbuilder, you can:
use the the ocamlbuild plugin provided with Ppx_driver
build a custom driver yourself using ocamlfind
These methods are described in the following sections.
Creating a new Ppx_driver based rewriter
If using jbuilder, you can just use the following jbuild file:
(library
((name my_ppx)
(public_name my_ppx)
(kind ppx_rewriter)
(libraries (ppx_core ppx_driver))
(ppx_runtime_libraries (<runtime dependencies if any>))
(preprocess (pps (ppx_metaquot)))))
(kind ppx_driver)
has two effects:
it links the library with
-linkall
. Since plugins register themselves with the Ppx_driver library by doing a toplevel side effect, you need to be sure they are linked in the static driver to be taken into accoundit instructs jbuilder to produce a special META file that is compatible with the various ways of using ppx rewriters, i.e. for people not using jbuilder or the ocamlbuild plugin
Building a custom driver using ocamlfind
To build a custom driver using ocamlfind, simply link all the AST transformers together with the ppx_driver.runner
package at the end:
ocamlfind ocamlopt -predicates ppx_driver -o ppx -linkpkg \
-package ppx_sexp_conv -package ppx_bin_prot \
-package ppx_driver_runner
Normally, ppx_driver based rewriters should be build with the approriate -linkall
option on individual libraries. If one is missing this option, the code rewriter might not get linked in. If this is the case, a workaround is to pass -linkall
when linking the custom driver.
The driver as a command line tool
$ ppx -help
ppx.exe [extra_args] [<files>]
-loc-filename <string> File name to use in locations
-reserve-namespace <string> Mark the given namespace as reserved
-no-check Disable checks (unsafe)
-apply <names> Apply these transformations in order (comma-separated list)
-dont-apply <names> Exclude these transformations
-no-merge Do not merge context free transformations (better for debugging rewriters)
-as-ppx Run as a -ppx rewriter (must be the first argument)
--as-ppx Same as -as-ppx
-as-pp Shorthand for: -dump-ast -embed-errors
--as-pp Same as -as-pp
-o <filename> Output file (use '-' for stdout)
- Read input from stdin
-no-optcomp Do not use optcomp (default if the input or output of -pp is a binary AST)
-dump-ast Dump the marshaled ast to the output file instead of pretty-printing it
--dump-ast Same as -dump-ast
-dparsetree Print the parsetree (same as ocamlc -dparsetree)
-embed-errors Embed errors in the output AST (default: true when -dump-ast, false otherwise)
-null Produce no output, except for errors
-impl <file> Treat the input as a .ml file
--impl <file> Same as -impl
-intf <file> Treat the input as a .mli file
--intf <file> Same as -intf
-debug-attribute-drop Debug attribute dropping
-print-transformations Print linked-in code transformations, in the order they are applied
-print-passes Print the actual passes over the whole AST in the order they are applied
-ite-check Enforce that "complex" if branches are delimited (disabled if -pp is given)
-pp <command> Pipe sources through preprocessor <command> (incompatible with -as-ppx)
-reconcile (WIP) Pretty print the output using a mix of the input source and the generated code
-reconcile-with-comments (WIP) same as -reconcile but uses comments to enclose the generated code
-no-color Don't use colors when printing errors
-diff-cmd Diff command when using code expectations
-pretty Instruct code generators to improve the prettiness of the generated code
-styler Code styler
-help Display this list of options
--help Display this list of options
When passed a file as argument, a ppx driver will pretty-print the code transformed by all its built-in AST transformers. This gives a convenient way of seeing the code generated for a given attribute/extension.
A driver can simply be used as the argument of the -pp
option of the OCaml compiler, or as the argument of the -ppx
option by passing -as-ppx
as first argument:
$ ocamlc -c -pp "ppx -as-pp" file.ml
$ ocamlc -c -ppx "ppx -as-ppx" file.ml
When used with -pp
, the driver will also interpret #
-directives using ppx_optcomp.
Using ppx_driver with ocamlbuild
Ppx_driver provides an ocamlbuild plugin to help building custom drivers on demand.
Setup
To use it you need to first tell ocamlbuild to use the plugin in myocamlbuild.ml
. If you are using oasis, add this to your _oasis
file:
AlphaFeatures: ocamlbuild_more_args
XOCamlbuildPluginTags: package(ppx_driver.ocamlbuild)
If you are calling ocamlbuild directly, you need to call it this way:
$ ocamlbuild -plugin-tag "package(ppx_driver.ocamlbuild)" ...
Once you have done that, you need to enable it in myocamlbuild.ml:
let () =
Ocamlbuild_plugin.dispatch (fun hook ->
Ppx_driver_ocamlbuild.dispatch hook;
<other dispatch functions>
)
Usage
The plugin provides a new parametric tag: ppx-driver
. The tag tags as argument +
separated list of rewriters (as findlib package names) followed by any command line arguments.
For instance to use ppx_sexp_conv
and ppx_bin_prot
put this in your tags file:
<**/*>: predicate(custom_ppx)
<src/*.{ml,mli}>: ppx-driver(ppx_sexp_conv+ppx_bin_prot)
The first line is to instruct ocamlfind not to automatically add implicit -ppx
argument. Without this, you might still get individual -ppx
for both ppx_sexp_conv
and ppx_bin_prot
in addition to the main driver that already contains them both, meaning your code would be transformed more than it should...
Future
For the future, there is an ongoing work to make this even simpler. This requires some changes to ocamlbuild, see this pull request for details.
ppx_driver rewriters as findlib libraries
Note: if using jbuilder, you do not need to read this as jbuilder already does all the right things for you.
In normal operation, Ppx_driver rewriters are packaged as findlib libraries. When using jbuilder everything is simple as preprocessors and normal dependencies are separated. However historically, people have been specifying both preprocessors and normal library dependencies together. Even worse, many build system still don't use a static driver and call out to multiple ppx commands to preprocess a single file, which slow downs compilation a lot.
In order for all these different methods to work properly, you need a peculiar META file. The rules are explained below.
It is recommended to split the findlib package into two:
one for the main library, which almost assume it is just a normal library
another sub-package one for:
allowing to mix preprocessors and normal dependencies
the method of calling one executable per rewriter
In the rest we'll assume we are writing a META file for a ppx_foo
rewriter, that itself uses the ppx_driver
, ppx_core
and re
libraries, and produce code using ppx_foo.runtime-lib
.
We want the META file to support all of these:
mix normal dependencies and preprocessors, using one executable per rewriter:
ocamlfind ocamlc -package ppx_foo -c toto.ml
mix normal dependencies and preprocessors, using a single ppx driver:
$ ocamlfind ocamlc -package ppx_foo -predicates custom_ppx \ -ppx ./custom-driver.exe -c toto.ml
build a custom driver:
$ ocamlfind ocamlc -linkpkg -package ppx_foo -predicates ppx_driver \ -o custom-driver.exe
build systems properly specifying preprocessors as such, separated from normal dependencies, as jbuilder does
Since preprocessors and normal dependencies are always specified separately in jbuild files, jbuilder just always set the ppx_driver
predicates.
In the end the META file should look like this:
# Standard package, expect it assumes that the "ppx_driver" predicate
# is set
version = "42.0"
description = "interprets [%foo ...] extensions"
requires(ppx_driver) = "ppx_core ppx_driver re"
archives(ppx_driver,byte) = "ppx_foo.cma"
archives(ppx_driver,native) = "ppx_foo.cmxa"
plugin(ppx_driver,byte) = "ppx_foo.cma"
plugin(ppx_driver,native) = "ppx_foo.cmxs"
# This is what jbuilder uses to find out the runtime dependencies of
# a preprocessor
ppx_runtime_deps = "ppx_foo.runtime-lib"
# This line makes things transparent for people mixing preprocessors
# and normal dependencies
requires(-ppx_driver) = "ppx_foo.deprecated-ppx-method"
package "deprecated-ppx-method" (
description = "glue package for the deprecated method of using ppx"
requires = "ppx_foo.runtime-lib"
ppx(-ppx_driver,-custom_ppx) = "./as-ppx.exe"
)
package "runtime-lib" ( ... )
You can check that this META works for all the 4 methods described above.
Dependencies (5)
-
ocaml-migrate-parsetree
>= "1.0.8" & < "2.0.0"
-
jbuilder
>= "1.0+beta18.1"
-
ppx_optcomp
>= "v0.10" & < "v0.11"
-
ppx_core
>= "v0.10" & < "v0.11"
-
ocaml
>= "4.04.1"
Dev Dependencies
None
Used by (97)
-
async
= "v0.10.0"
-
async_durable
< "v0.11.0"
-
async_extended
= "v0.10.0"
-
async_extra
= "v0.10.0"
-
async_find
= "v0.10.0"
-
async_inotify
= "v0.10.0"
-
async_interactive
= "v0.10.0"
-
async_js
= "v0.10.0"
-
async_kernel
= "v0.10.0"
-
async_parallel
= "v0.10.0"
-
async_rpc_kernel
= "v0.10.0"
-
async_sendfile
< "v0.11.0"
-
async_shell
= "v0.10.0"
-
async_smtp
= "v0.10.0"
-
async_ssl
= "v0.10.0"
-
async_unix
= "v0.10.0"
-
bignum
= "v0.10.0"
-
bin_prot
= "v0.10.0"
-
caqti-dynload
< "0.11.0"
-
command_rpc
= "v0.10.0"
-
coq-serapi
< "8.7.2+0.4.13"
-
core
= "v0.10.0"
-
core_bench
= "v0.10.0"
-
core_extended
= "v0.10.0"
-
core_kernel
= "v0.10.0"
-
core_profiler
= "v0.10.0"
-
csvfields
= "v0.10.0"
-
delimited_parsing
< "v0.11.0"
-
ecaml
= "v0.10.0"
-
email_message
= "v0.10.0"
-
expect_test_helpers
= "v0.10.0"
-
expect_test_helpers_kernel
= "v0.10.0"
-
fieldslib
= "v0.10.0"
-
frenetic
>= "5.0.0" & < "5.0.5"
-
horned_worm
= "0.3.1"
-
incr_dom
= "v0.10.0"
-
incr_dom_widgets
< "v0.11.0"
-
incr_map
= "v0.10.0"
-
incr_select
= "v0.10.0"
-
incremental
= "v0.10.0"
-
incremental_kernel
= "v0.10.0"
- jane-street-tests
-
jenga
= "v0.10.0"
-
line-up-words
< "v0.11.0"
-
mlt_parser
< "v0.11.0"
-
ocaml_plugin
= "v0.10.0"
-
parsexp
= "v0.10.0"
-
parsexp_io
= "v0.10.0"
-
patdiff
= "v0.10.0"
-
patience_diff
= "v0.10.0"
-
posixat
= "v0.10.0"
-
ppx_assert
= "v0.10.0"
-
ppx_base
= "v0.10.0"
-
ppx_bench
= "v0.10.0"
-
ppx_bin_prot
= "v0.10.0"
-
ppx_compare
= "v0.10.0"
-
ppx_conv_func
= "v0.10.0"
-
ppx_cstruct
>= "3.1.0" & < "4.0.0"
-
ppx_csv_conv
= "v0.10.0"
-
ppx_custom_printf
= "v0.10.0"
-
ppx_deriving_protocol
< "0.8.1"
-
ppx_enumerate
= "v0.10.0"
-
ppx_expect
>= "v0.10.0" & < "v0.11.0"
-
ppx_fail
= "v0.10.0"
-
ppx_fields_conv
= "v0.10.0"
-
ppx_fun
< "0.0.2"
-
ppx_hash
= "v0.10.0"
-
ppx_here
= "v0.10.0"
-
ppx_inline_test
>= "v0.10.0" & < "v0.11.0"
-
ppx_jane
= "v0.10.0"
-
ppx_js_style
= "v0.10.0"
-
ppx_jsobject_conv
< "0.6.0"
-
ppx_let
= "v0.10.0"
-
ppx_metaquot
= "v0.10.0"
-
ppx_optional
= "v0.10.0"
-
ppx_pipebang
= "v0.10.0"
-
ppx_protocol_conv
< "3.1.3"
-
ppx_sexp_conv
= "v0.10.0"
-
ppx_sexp_message
= "v0.10.0"
-
ppx_sexp_value
= "v0.10.0"
-
ppx_traverse
= "v0.10.0"
-
ppx_type_conv
= "v0.10.0"
-
ppx_typerep_conv
= "v0.10.0"
-
ppx_variants_conv
= "v0.10.0"
-
ppx_xml_conv
= "v0.10.0"
-
protocol_version_header
< "v0.11.0"
-
re2
>= "v0.10.0" & < "v0.11.0"
-
record_builder
< "v0.11.0"
-
rpc_parallel
= "v0.10.0"
-
sexp_pretty
= "v0.10.0"
-
splay_tree
< "v0.11.0"
-
textutils
= "v0.10.0"
-
textutils_kernel
< "v0.11.0"
-
toplevel_expect_test
= "v0.10.0"
-
topological_sort
= "v0.10.0"
-
variantslib
= "v0.10.0"
-
virtual_dom
= "v0.10.0"
Conflicts
None