Skip to content

Commit bcabaab

Browse files
committed
Revert @dylex's binding group change - was breaking strongcheck. Third time lucky ...
1 parent 93cdfe8 commit bcabaab

1 file changed

Lines changed: 1 addition & 0 deletions

File tree

src/Language/PureScript/Sugar/BindingGroups.hs

Lines changed: 1 addition & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -154,6 +154,7 @@ getProperName _ = error "Expected DataDeclaration"
154154
--
155155
toBindingGroup :: ModuleName -> SCC Declaration -> Either ErrorStack Declaration
156156
toBindingGroup _ (AcyclicSCC d) = return d
157+
toBindingGroup _ (CyclicSCC [d]) = return d
157158
toBindingGroup moduleName (CyclicSCC ds') =
158159
-- Once we have a mutually-recursive group of declarations, we need to sort
159160
-- them further by their immediate dependencies (those outside function

0 commit comments

Comments
 (0)