servant/src/Servant/API/Get.hs

15 lines
343 B
Haskell
Raw Normal View History

{-# LANGUAGE DeriveDataTypeable #-}
2015-01-08 16:24:19 +01:00
{-# LANGUAGE DataKinds #-}
{-# LANGUAGE KindSignatures #-}
module Servant.API.Get where
2015-01-06 17:54:53 +01:00
import Data.Typeable ( Typeable )
2014-11-22 17:41:35 +01:00
-- | Endpoint for simple GET requests. Serves the result as JSON.
--
-- Example:
--
2015-01-08 16:24:19 +01:00
-- > type MyApi = "books" :> Get '[JSON] [Book]
2015-02-19 10:29:19 +01:00
data Get (contentTypes::[*]) a
deriving Typeable