Install c/cxx stubs for virtual libraries
Signed-off-by: Rudi Grinberg <rudi.grinberg@gmail.com>
This commit is contained in:
parent
44ca7f0bbf
commit
1ded621dc7
|
@ -164,8 +164,13 @@ module Gen(P : Params) = struct
|
||||||
| Some f -> Some f.path)
|
| Some f -> Some f.path)
|
||||||
])
|
])
|
||||||
; if_ (byte && not virtual_library) [ Library.archive ~dir lib ~ext:".cma" ]
|
; if_ (byte && not virtual_library) [ Library.archive ~dir lib ~ext:".cma" ]
|
||||||
; if_ (Library.has_stubs lib && not virtual_library)
|
; if virtual_library then (
|
||||||
|
(lib.c_names @ lib.cxx_names)
|
||||||
|
|> List.map ~f:(fun (_, c) -> Path.relative dir (c ^ ext_obj))
|
||||||
|
) else if Library.has_stubs lib then (
|
||||||
[ Library.stubs_archive ~dir lib ~ext_lib:ctx.ext_lib ]
|
[ Library.stubs_archive ~dir lib ~ext_lib:ctx.ext_lib ]
|
||||||
|
) else
|
||||||
|
[]
|
||||||
; if_ (native && not virtual_library)
|
; if_ (native && not virtual_library)
|
||||||
(let files =
|
(let files =
|
||||||
[ Library.archive ~dir lib ~ext:".cmxa"
|
[ Library.archive ~dir lib ~ext:".cmxa"
|
||||||
|
|
Loading…
Reference in New Issue