Skip to content
This repository was archived by the owner on Apr 1, 2025. It is now read-only.

Commit ef559e0

Browse files
committed
Rename resolve.
1 parent 99b82b2 commit ef559e0

1 file changed

Lines changed: 2 additions & 2 deletions

File tree

semantic-analysis/src/Analysis/Module.hs

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -23,5 +23,5 @@ instance Semigroup (ModuleSet a) where
2323

2424
link :: ModuleSet a -> Module a -> Module a
2525
link (ModuleSet ms) m = Module body' (imports m Set.\\ Map.keysSet ms) (exports m) unknown' where
26-
(unknown', body') = foldl' (uncurry resolve) (unknown m, body m) (Map.restrictKeys ms (imports m))
27-
resolve unknown body m = (unknown Set.\\ Map.keysSet (exports m), body . mappend (Map.restrictKeys (exports m) unknown))
26+
(unknown', body') = foldl' (uncurry resolveSymbolsInModule) (unknown m, body m) (Map.restrictKeys ms (imports m))
27+
resolveSymbolsInModule unknown body m = (unknown Set.\\ Map.keysSet (exports m), body . mappend (Map.restrictKeys (exports m) unknown))

0 commit comments

Comments
 (0)