diff options
| author | Ben Gamari <bgamari.foss@gmail.com> | 2017-09-16 23:47:37 -0400 |
|---|---|---|
| committer | Ben Gamari <ben@smart-cactus.org> | 2017-09-16 23:47:55 -0400 |
| commit | 4ec4ca999ac558e1678b0a609417de5bf08c3ad5 (patch) | |
| tree | 8f52e224ae058f0eeecde9696f06bdf0b7ef84bd | |
| parent | b09917143afe837d717feeaf97b699bcc9e016cd (diff) | |
| download | haskell-4ec4ca999ac558e1678b0a609417de5bf08c3ad5.tar.gz | |
base: Add missing MonadFail instance for strict ST
Test Plan: Validate
Reviewers: hvr, RyanGlScott, austin
Reviewed By: RyanGlScott
Subscribers: rwbarton, thomie
Differential Revision: https://phabricator.haskell.org/D3982
| -rw-r--r-- | libraries/base/GHC/ST.hs | 4 | ||||
| -rw-r--r-- | libraries/base/changelog.md | 2 |
2 files changed, 6 insertions, 0 deletions
diff --git a/libraries/base/GHC/ST.hs b/libraries/base/GHC/ST.hs index 9f8bb6489f..7f3b4ff951 100644 --- a/libraries/base/GHC/ST.hs +++ b/libraries/base/GHC/ST.hs @@ -78,6 +78,10 @@ instance Monad (ST s) where (k2 new_s) }}) -- | @since 4.11.0.0 +instance Fail.MonadFail (ST s) where + fail s = errorWithoutStackTrace s + +-- | @since 4.11.0.0 instance Semigroup a => Semigroup (ST s a) where (<>) = liftA2 (<>) diff --git a/libraries/base/changelog.md b/libraries/base/changelog.md index 0ef50731bf..eac53ba079 100644 --- a/libraries/base/changelog.md +++ b/libraries/base/changelog.md @@ -40,6 +40,8 @@ * Add `Data` instances for `IntPtr` and `WordPtr` (#13115) + * Add missing `MonadFail` instance for `Control.Monad.Strict.ST.ST` + ## 4.10.0.0 *April 2017* * Bundled with GHC *TBA* |