@@ -71,11 +71,7 @@ renderChildDeclarationWithOptions :: RenderTypeOptions -> ChildDeclaration -> Re
71renderChildDeclarationWithOptions opts ChildDeclaration{..} =
71renderChildDeclarationWithOptions opts ChildDeclaration{..} =
72 mintersperse sp $ case cdeclInfo of
72 mintersperse sp $ case cdeclInfo of
73 ChildInstance constraints ty ->
73 ChildInstance constraints ty ->
77− ] ++ maybeToList (renderConstraints constraints)
74+ maybeToList (renderConstraints constraints) ++ [ renderType' ty ]
78− ++ [ renderType' ty ]
79 ChildDataConstructor args ->
75 ChildDataConstructor args ->
80 [ renderType' typeApp' ]
76 [ renderType' typeApp' ]