@@ -71,6 +71,8 @@ module Servant.API.ContentTypes
7171import Control.Arrow
7272 (left)
7373import Control.Monad.Compat
74+import Control.DeepSeq
75+ (NFData)
7476import Data.Aeson
7577 (FromJSON (..), ToJSON (..), encode)
7678import Data.Aeson.Parser
@@ -361,6 +363,8 @@ instance MimeRender OctetStream BS.ByteString where
361363data NoContent = NoContent
362364 deriving (Show, Eq, Read, Generic)
363365
366+instance NFData NoContent
367+
364368
365369--------------------------------------------------------------------------
366370-- * MimeUnrender Instances