019f8fd211
git-subtree-dir: users/wpcarro git-subtree-mainline:464bbcb15cgit-subtree-split:24f5a642afChange-Id: I6105b3762b79126b3488359c95978cadb3efa789
16 lines
620 B
Haskell
16 lines
620 B
Haskell
{-# LANGUAGE DataKinds #-}
|
|
{-# LANGUAGE TypeOperators #-}
|
|
--------------------------------------------------------------------------------
|
|
module API where
|
|
--------------------------------------------------------------------------------
|
|
import Servant.API
|
|
|
|
import qualified Types as T
|
|
--------------------------------------------------------------------------------
|
|
|
|
type API = "verify"
|
|
:> ReqBody '[JSON] T.VerifyGoogleSignInRequest
|
|
:> Post '[JSON] NoContent
|
|
:<|> "create-payment-intent"
|
|
:> ReqBody '[JSON] T.PaymentIntent
|
|
:> Post '[JSON] T.CreatePaymentIntentResponse
|