diff --git a/servant/servant.cabal b/servant/servant.cabal index 14229d16..3e126d66 100644 --- a/servant/servant.cabal +++ b/servant/servant.cabal @@ -36,6 +36,7 @@ library Servant.API.BasicAuth Servant.API.Capture Servant.API.ContentTypes + Servant.API.Empty Servant.API.Experimental.Auth Servant.API.Header Servant.API.HttpVersion diff --git a/servant/src/Servant/API/Empty.hs b/servant/src/Servant/API/Empty.hs new file mode 100644 index 00000000..5aa5c0ab --- /dev/null +++ b/servant/src/Servant/API/Empty.hs @@ -0,0 +1,10 @@ +{-# LANGUAGE DeriveDataTypeable #-} +{-# OPTIONS_HADDOCK not-home #-} +module Servant.API.Empty(EmptyAPI(..)) where + +import Data.Typeable (Typeable) +import Prelude () +import Prelude.Compat + +-- | An empty API: one which serves nothing. +data EmptyAPI = EmptyAPI deriving (Typeable, Eq, Show, Bounded)