Ensure .cmxa files depend on object files

Signed-off-by: David Allsopp <david.allsopp@metastack.com>
This commit is contained in:
David Allsopp 2017-08-26 15:05:54 +01:00
parent 77c79ebff8
commit 1053d4e65a
1 changed files with 8 additions and 0 deletions

View File

@ -86,6 +86,12 @@ module Gen(P : Params) = struct
else
fun x -> x
in
let objs (cm, _, _, _) =
if mode = Mode.Byte then
[]
else
List.map ~f:(Path.change_extension ~ext:ctx.ext_obj) cm
in
SC.add_rule sctx
(Build.fanout4
(dep_graph >>>
@ -100,6 +106,8 @@ module Gen(P : Params) = struct
(Ocaml_flags.get flags mode)
(SC.expand_and_eval_set sctx ~scope ~dir lib.library_flags ~standard:[])
>>>
Build.dyn_paths (Build.arr objs)
>>>
Build.run ~context:ctx (Dep compiler)
~extra_targets:(
match mode with