Fix build of the aliases module
This commit is contained in:
parent
4bdac39dd4
commit
dce615a559
|
@ -1007,7 +1007,7 @@ module Gen(P : Params) = struct
|
||||||
Option.iter alias_module ~f:(fun m ->
|
Option.iter alias_module ~f:(fun m ->
|
||||||
let flags = Ocaml_flags.default () in
|
let flags = Ocaml_flags.default () in
|
||||||
build_module m
|
build_module m
|
||||||
~flags:{ flags with common = "-w" :: "-49" :: flags.common }
|
~flags:{ flags with common = flags.common @ ["-w"; "-49"] }
|
||||||
~dir
|
~dir
|
||||||
~modules:(String_map.singleton m.name m)
|
~modules:(String_map.singleton m.name m)
|
||||||
~dep_graph:(Ml_kind.Dict.make_both (Build.return (String_map.singleton m.name [])))
|
~dep_graph:(Ml_kind.Dict.make_both (Build.return (String_map.singleton m.name [])))
|
||||||
|
|
Loading…
Reference in New Issue