summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorRyan Scott <ryan.gl.scott@gmail.com>2016-12-20 16:32:30 -0500
committerRyan Scott <ryan.gl.scott@gmail.com>2016-12-20 16:32:30 -0500
commit8fdb937770d8a4c726585def51ac54bf438e9564 (patch)
tree33e700a7a976ebcb202c52c025abdb722d2619fc
parent4535fa2646fb0df753165ecbad25be53318ec123 (diff)
downloadhaskell-8fdb937770d8a4c726585def51ac54bf438e9564.tar.gz
Make CompactionFailed a newtype
-rw-r--r--libraries/base/GHC/IO/Exception.hs4
1 files changed, 2 insertions, 2 deletions
diff --git a/libraries/base/GHC/IO/Exception.hs b/libraries/base/GHC/IO/Exception.hs
index a8d63d3b28..3c088520cc 100644
--- a/libraries/base/GHC/IO/Exception.hs
+++ b/libraries/base/GHC/IO/Exception.hs
@@ -129,12 +129,12 @@ allocationLimitExceeded = toException AllocationLimitExceeded
-----
--- |Compaction found an object that cannot be compacted. Functions
+-- | Compaction found an object that cannot be compacted. Functions
-- cannot be compacted, nor can mutable objects or pinned objects.
-- See 'Data.Compact.compact'.
--
-- @since 4.10.0.0
-data CompactionFailed = CompactionFailed String
+newtype CompactionFailed = CompactionFailed String
-- | @since 4.10.0.0
instance Exception CompactionFailed where