matthieu
/
dune
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Compute the transitive closure of ppx runtime deps only when needed 

We only need it when the kind is ppx_rewriter or ppx_deriver.
This commit is contained in:
Jeremie Dimino 2018-01-24 18:12:50 +00:00
parent fde877838b
commit ad9b82e92a
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
src/gen_meta.ml
View File

@ -93,7 +93,7 @@ let gen_lib pub_name (lib : Library.t) ~lib_deps ~ppx_runtime_deps:ppx_rt_deps
[ [ Comment "This line makes things transparent for people mixing \
preprocessors"
; Comment "and normal dependencies"
; requires ~preds:[no_ppx_driver] ppx_runtime_deps_for_deprecated_method
; requires ~preds:[no_ppx_driver] (Lazy.force ppx_runtime_deps_for_deprecated_method)
]
; match lib.kind with
| Normal -> assert false
@ -155,12 +155,12 @@ let gen ~package ~version ~stanzas ~resolve_lib_dep_names
Sigh...
*)
let ppx_runtime_deps_for_deprecated_method =
let ppx_runtime_deps_for_deprecated_method = lazy (
String_set.union
(String_set.of_list ppx_runtime_deps)
(ppx_runtime_deps_for_deprecated_method_exn ~dir
lib.buildable.libraries)
|> String_set.elements
|> String_set.elements)
in
(pub_name,
gen_lib pub_name lib ~lib_deps ~ppx_runtime_deps ~version