diff options
Diffstat (limited to 'libraries/base/GHC/Show.hs')
-rw-r--r-- | libraries/base/GHC/Show.hs | 4 |
1 files changed, 1 insertions, 3 deletions
diff --git a/libraries/base/GHC/Show.hs b/libraries/base/GHC/Show.hs index ecfb7dbe0f..04fbcb6112 100644 --- a/libraries/base/GHC/Show.hs +++ b/libraries/base/GHC/Show.hs @@ -169,9 +169,7 @@ appPrec1 = I# 11# -- appPrec + 1 deriving instance Show () -- | @since 4.15 -instance Show a => Show (Solo a) where - showsPrec d (Solo x) = showParen (d > 10) $ - showString "Solo " . showsPrec 11 x +deriving instance Show a => Show (Solo a) -- | @since 2.01 instance Show a => Show [a] where |