unisonweb/unison
1
0
Fork 0
mirror of https://github.com/unisonweb/unison.git synced 2024-09-20 23:07:13 +03:00
Code Issues Projects Releases Wiki Activity

Fix bad rename

Browse Source
This commit is contained in:
Chris Penner 2022-02-11 11:06:17 -06:00
parent 3d3076368f
commit f3b558cb19
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
unison-cli/src/Unison/Codebase/Editor/SlurpComponent.hs
View File

@ -61,7 +61,7 @@ closeWithDependencies uf inputs = seenDefns {ctors = constructorDeps}
seenTypes = foldl' typeDeps mempty (types inputs)
constructorDeps :: Set v
constructorDeps = UF.constructorsForTypeVars seenTypes uf
constructorDeps = UF.constructorsForDecls seenTypes uf
termDeps :: SlurpComponent v -> v -> SlurpComponent v
termDeps seen v | Set.member v (terms seen) = seen