Regenerate examples

data/examples/declaration/class/default-signatures-out.hs

@@ -14,9 +14,7 @@ class Bar a where
     ( Read a,
       Semigroup a
     ) =>
-    a ->
-    a ->
-    a
+    a -> a -> a
   -- Even more pointless comment
   bar
     a

data/examples/declaration/data/gadt/multiline-out.hs

@@ -9,9 +9,7 @@ data Foo a where
     forall a b.
     (Show a, Eq b) => -- foo
     -- bar
-    a ->
-    b ->
-    Foo 'Int
+    a -> b -> Foo 'Int
   -- | But 'Bar' is also not too bad.
   Bar ::
     Int -> Maybe Text -> Foo 'Bool

data/examples/declaration/rewrite-rule/type-signature-out.hs

@@ -8,9 +8,7 @@
   z
   ( g ::
       forall b.
-      (a -> b -> b) ->
-      b ->
-      b
+      (a -> b -> b) -> b -> b
   ).
   foldr k z (build g) =
     g k z

data/examples/declaration/value/function/fancy-forall-0-out.hs

@@ -6,5 +6,4 @@ wrapError ::
     HasCatch innertag inner (t m'),
     HasCatch outertag outer m
   ) =>
-  (forall m'. (HasCatch innertag inner m') => m' a) ->
-  m a
+  (forall m'. (HasCatch innertag inner m') => m' a) -> m a

data/examples/declaration/value/function/fancy-forall-1-out.hs

@@ -6,5 +6,4 @@ magnify ::
     HasReader innertag inner (t m'),
     HasReader outertag outer m
   ) =>
-  (forall m'. (HasReader innertag inner m') => m' a) ->
-  m a
+  (forall m'. (HasReader innertag inner m') => m' a) -> m a

data/examples/declaration/value/function/implicit-params-out.hs

@@ -11,6 +11,5 @@ sort' ::
       a -> a -> Bool,
     ?foo :: Int
   ) =>
-  [a] ->
-  [a]
+  [a] -> [a]
 sort' = sort

data/examples/other/multiline-forall-out.hs

@@ -22,8 +22,7 @@ data G where
       )
       (x :: *)
       (y :: *).
-    f x y ->
-    G
+    f x y -> G
 
 f ::
   forall
@@ -32,8 +31,7 @@ f ::
     )
     (x :: *)
     (y :: *).
-  f x y ->
-  ()
+  f x y -> ()
 f = const ()
 
 type family T f x y where