Clean up

libraries/base/Data/Semigroup.hs

@@ -126,7 +126,6 @@ cycle1 xs = xs' where xs' = xs <> xs'
 
 -- | This lets you use a difference list of a 'Semigroup' as a 'Monoid'.
 --
--- >>> import Data.Semigroup
 -- >>> let hello = diff "Hello, "
 -- >>> appEndo hello "World!"
 -- "Hello, World!"
@@ -136,9 +135,9 @@ cycle1 xs = xs' where xs' = xs <> xs'
 -- "Hello, World!"
 -- >>> let world = diff "World"
 -- >>> let excl = diff "!"
--- >>> print $ appEndo (hello <> (world <> excl)) mempty
+-- >>> appEndo (hello <> (world <> excl)) mempty
 -- "Hello, World!"
--- >>> print $ appEndo ((hello <> world) <> excl) mempty
+-- >>> appEndo ((hello <> world) <> excl) mempty
 -- "Hello, World!"
 diff :: Semigroup m => m -> Endo m
 diff = Endo . (<>)