We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
There was an error while loading. Please reload this page.
1 parent 6938f76 commit dfc2072Copy full SHA for dfc2072
src/dune_rules/module_compilation.ml
@@ -383,9 +383,12 @@ let build_module ?(force_write_cmi = false) ?(precompiled_cmi = false) cctx m =
383
Super_context.add_rule sctx ~dir action_with_targets)))
384
in
385
Memo.when_ melange (fun () ->
386
- let* () = build_cm ~cm_kind:(Melange Cmj) ~phase:None in
387
- Memo.when_ (not precompiled_cmi) (fun () ->
388
- build_cm ~cm_kind:(Melange Cmi) ~phase:None))
+ let+ () = build_cm ~cm_kind:(Melange Cmj) ~phase:None
+ and+ () =
+ Memo.when_ (not precompiled_cmi) (fun () ->
389
+ build_cm ~cm_kind:(Melange Cmi) ~phase:None)
390
+ in
391
+ ())
392
;;
393
394
let ocamlc_i ~deps cctx (m : Module.t) ~output =
0 commit comments