graphql-engine/server/src-lib/Hasura/Server/Context.hs

14 lines
281 B
Haskell
Raw Normal View History

module Hasura.Server.Context
(HttpResponse(..))
where
import Hasura.Prelude
import qualified Network.HTTP.Types as HTTP
data HttpResponse a
= HttpResponse
{ _hrBody :: !a
, _hrHeaders :: !HTTP.ResponseHeaders
} deriving (Functor, Foldable, Traversable)