Allow deepseq 1.3
This commit is contained in:
parent
90ecc1ebe3
commit
c24d0e7f80
@ -64,6 +64,7 @@ import Control.Monad.Reader (MonadReader (..))
|
|||||||
import Prelude hiding (catch)
|
import Prelude hiding (catch)
|
||||||
#endif
|
#endif
|
||||||
import Control.DeepSeq (NFData (rnf))
|
import Control.DeepSeq (NFData (rnf))
|
||||||
|
import Control.DeepSeq.Generics (genericRnf)
|
||||||
import Data.Conduit.Lazy (MonadActive, monadActive)
|
import Data.Conduit.Lazy (MonadActive, monadActive)
|
||||||
import Yesod.Core.TypeCache (TypeMap, KeyedTypeMap)
|
import Yesod.Core.TypeCache (TypeMap, KeyedTypeMap)
|
||||||
#if MIN_VERSION_monad_logger(0, 3, 10)
|
#if MIN_VERSION_monad_logger(0, 3, 10)
|
||||||
@ -317,7 +318,8 @@ data ErrorResponse =
|
|||||||
| PermissionDenied Text
|
| PermissionDenied Text
|
||||||
| BadMethod H.Method
|
| BadMethod H.Method
|
||||||
deriving (Show, Eq, Typeable, Generic)
|
deriving (Show, Eq, Typeable, Generic)
|
||||||
instance NFData ErrorResponse
|
instance NFData ErrorResponse where
|
||||||
|
rnf = genericRnf
|
||||||
|
|
||||||
----- header stuff
|
----- header stuff
|
||||||
-- | Headers to be added to a 'Result'.
|
-- | Headers to be added to a 'Result'.
|
||||||
|
|||||||
@ -63,7 +63,8 @@ library
|
|||||||
, unix-compat
|
, unix-compat
|
||||||
, conduit-extra
|
, conduit-extra
|
||||||
, exceptions >= 0.6
|
, exceptions >= 0.6
|
||||||
, deepseq >= 1.4
|
, deepseq >= 1.3
|
||||||
|
, deepseq-generics
|
||||||
, mwc-random
|
, mwc-random
|
||||||
, primitive
|
, primitive
|
||||||
, word8
|
, word8
|
||||||
|
|||||||
Loading…
Reference in New Issue
Block a user