diff --git a/prettyprinter/test/Testsuite/Main.hs b/prettyprinter/test/Testsuite/Main.hs
index afad90cf..11ebfc9b 100644
--- a/prettyprinter/test/Testsuite/Main.hs
+++ b/prettyprinter/test/Testsuite/Main.hs
@@ -122,7 +122,7 @@ groupLayoutEqualsSimpleGroupLayout = forAllShow (arbitrary :: Gen (Doc Int)) (sh
             groupedLayedOut = layout layouter grouped
             groupedSimpleLayedOut = layout layouter groupedSimple
         in counterexample ("Grouped: " ++ (show . diag) grouped)
-            (counterexample ("Grouped (Simple) " ++ (show . diag) (groupedSimple))
+            (counterexample ("Grouped (Simple) " ++ (show . diag) groupedSimple)
                 (groupedLayedOut === groupedSimpleLayedOut))))
 
 instance Arbitrary ann => Arbitrary (Doc ann) where