diff --git a/src/compiler/hxb/hxbWriter.ml b/src/compiler/hxb/hxbWriter.ml index 04dc89669de..621be76a395 100644 --- a/src/compiler/hxb/hxbWriter.ml +++ b/src/compiler/hxb/hxbWriter.ml @@ -2266,7 +2266,7 @@ module HxbWriter = struct sig_deps := PMap.add mdep.m_id dep !sig_deps; ) writer.sig_deps; PMap.iter (fun id mdep -> match mdep.md_kind, mdep.md_origin with - | (MCode | MExtern), MDepFromMacro -> sig_deps := PMap.add id mdep !sig_deps; + | (MCode | MExtern), MDepFromMacro when mdep.md_sign = m.m_extra.m_sign -> sig_deps := PMap.add id mdep !sig_deps; | _ -> () ) m.m_extra.m_deps; m.m_extra.m_sig_deps <- Some !sig_deps;