diff options
Diffstat (limited to 'libraries/base/GHC/Read.hs')
| -rw-r--r-- | libraries/base/GHC/Read.hs | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/libraries/base/GHC/Read.hs b/libraries/base/GHC/Read.hs index 1057300c28..7f698ec498 100644 --- a/libraries/base/GHC/Read.hs +++ b/libraries/base/GHC/Read.hs @@ -73,6 +73,7 @@ import GHC.Base import GHC.Arr import GHC.Word import GHC.List (filter) +import GHC.Tuple (Solo (..)) -- | @'readParen' 'True' p@ parses what @p@ parses, but surrounded with @@ -667,6 +668,9 @@ instance Read () where readListPrec = readListPrecDefault readList = readListDefault +-- | @since 4.15 +deriving instance Read a => Read (Solo a) + -- | @since 2.01 instance (Read a, Read b) => Read (a,b) where readPrec = wrap_tup read_tup2 |