ocaml – 如何在ppx_deriving中使用jbuild和ppx_driver

我试图和 ppx_deriving一起使用 jbuilder(具体是ppx_deriving_yojson),但现在已经卡住了一个多小时.我目前的方法是一个jbuild文件,包含以下内容:

(jbuild_version 1)
(executables
((names (my-binary))
(libraries
 (ppx_deriving
  ppx_deriving_yojson
  cohttp
  yojson))
(preprocess (pps (ppx_deriving_yojson ppx_driver.runner)))))

但结果是

Command [5] exited with code 1:
$(cd _build/default && ../.ppx/default/ppx_deriving_yojson+ppx_driver.runner/ppx.exe --dump-ast -o src/my_file.pp.ml --impl src/my_file.ml)
File "src/my_file.ml", line 16, characters 5-13:
Error: Attribute `deriving' was not used

使用-print-transformations手动在_build / .ppx / default / ppx_deriving_yojson ppx_driver.runner / ppx.exe中运行生成的ppx_driver会产生空输出,所以我显然遗漏了一些东西.

只需将ppx_deriving和ppx_deriving_yojson作为依赖项包含在topkg中,代码就可以很好地构建.

最佳答案 截至ppx_deriving_yojson的更新版本,这应该是可能的.

码:

type t = {x: int; y: int} [@@deriving to_yojson]

let () = print_endline (Yojson.Safe.to_string (to_yojson {x= 1; y= 2}))

和一个示例jbuild文件:

(jbuild_version 1)

(executables
 ((names (main))
  (preprocess (pps (ppx_deriving_yojson)))
  (libraries (ppx_deriving_yojson.runtime))))

(install
 ((section bin)
  (files ((main.exe as main)))))
点赞