git.iko.soy/typeable/servant
on master help sign in
Merge pull request #1090 from domenkozar/nocontent-nfdata
7bbcfb2Oleg Grenrus
servant/servant.cabal+1
@@ -109,6 +109,7 @@ library
109 , attoparsec >= 0.13.2.2 && < 0.14
109 , attoparsec >= 0.13.2.2 && < 0.14
110 , bifunctors >= 5.5.3 && < 5.6
110 , bifunctors >= 5.5.3 && < 5.6
111 , case-insensitive >= 1.2.0.11 && < 1.3
111 , case-insensitive >= 1.2.0.11 && < 1.3
112+ , deepseq >= 1.4.2.0 && < 1.5
112 , http-media >= 0.7.1.3 && < 0.8
113 , http-media >= 0.7.1.3 && < 0.8
113 , http-types >= 0.12.2 && < 0.13
114 , http-types >= 0.12.2 && < 0.13
114 , mmorph >= 1.1.2 && < 1.2
115 , mmorph >= 1.1.2 && < 1.2
servant/src/Servant/API/ContentTypes.hs+4
@@ -71,6 +71,8 @@ module Servant.API.ContentTypes
71import Control.Arrow
71import Control.Arrow
72 (left)
72 (left)
73import Control.Monad.Compat
73import Control.Monad.Compat
74+import Control.DeepSeq
75+ (NFData)
74import Data.Aeson
76import Data.Aeson
75 (FromJSON (..), ToJSON (..), encode)
77 (FromJSON (..), ToJSON (..), encode)
76import Data.Aeson.Parser
78import Data.Aeson.Parser
@@ -361,6 +363,8 @@ instance MimeRender OctetStream BS.ByteString where
361data NoContent = NoContent
363data NoContent = NoContent
362 deriving (Show, Eq, Read, Generic)
364 deriving (Show, Eq, Read, Generic)
363
365
366+instance NFData NoContent
367+
364
368
365--------------------------------------------------------------------------
369--------------------------------------------------------------------------
366-- * MimeUnrender Instances
370-- * MimeUnrender Instances