2014-10-30 14:54:00 +01:00
|
|
|
{-# LANGUAGE DeriveDataTypeable #-}
|
2015-01-08 16:24:19 +01:00
|
|
|
{-# LANGUAGE DataKinds #-}
|
|
|
|
{-# LANGUAGE KindSignatures #-}
|
2014-10-25 01:27:39 +02:00
|
|
|
module Servant.API.Get where
|
|
|
|
|
2015-01-06 17:54:53 +01:00
|
|
|
import Data.Typeable ( Typeable )
|
2014-10-25 01:27:39 +02:00
|
|
|
|
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
|
2014-10-30 14:54:00 +01:00
|
|
|
deriving Typeable
|