@@ -309,7 +309,7 @@ verifyDependencies env@(Env key scope root cache _ _ _) time outline solution di
310 objs = Map.foldr addObjects Opt.empty artifacts
310 objs = Map.foldr addObjects Opt.empty artifacts
311 ifaces = Map.foldrWithKey (addInterfaces directDeps) Map.empty artifacts
311 ifaces = Map.foldrWithKey (addInterfaces directDeps) Map.empty artifacts
312− foreigns = Map.map (OneOrMore.destruct Foreign) $ Map.foldrWithKey gatherForeigns Map.empty artifacts
312+ foreigns = Map.map (OneOrMore.destruct Foreign) $ Map.foldrWithKey gatherForeigns Map.empty $ Map.intersection artifacts directDeps
313 details = Details time outline Map.empty foreigns (ArtifactsFresh ifaces objs)
313 details = Details time outline Map.empty foreigns (ArtifactsFresh ifaces objs)
315 do BW.writeBinary scope (Stuff.objects root) objs
315 do BW.writeBinary scope (Stuff.objects root) objs