on b00596a help sign in
servant/src/Servant/API/ReqBody.hs
11 lines 289 B history raw
1{-# LANGUAGE DataKinds #-}
2{-# LANGUAGE PolyKinds #-}
3module Servant.API.ReqBody where
5-- | Extract the request body as a value of type @a@.
6--
7-- Example:
8--
9-- > -- POST /books
10-- > type MyApi = "books" :> ReqBody '[JSON] Book :> Post Book
11data ReqBody (contentTypes::[*]) a