We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
1 parent 8811af2 commit ec330bcCopy full SHA for ec330bc
prettyprinter/test/Testsuite/Main.hs
@@ -122,7 +122,7 @@ groupLayoutEqualsSimpleGroupLayout = forAllShow (arbitrary :: Gen (Doc Int)) (sh
122
groupedLayedOut = layout layouter grouped
123
groupedSimpleLayedOut = layout layouter groupedSimple
124
in counterexample ("Grouped: " ++ (show . diag) grouped)
125
- (counterexample ("Grouped (Simple) " ++ (show . diag) (groupedSimple))
+ (counterexample ("Grouped (Simple) " ++ (show . diag) groupedSimple)
126
(groupedLayedOut === groupedSimpleLayedOut))))
127
128
instance Arbitrary ann => Arbitrary (Doc ann) where
0 commit comments