about summary refs log tree commit diff
path: root/website/sandbox/learnpianochords/src/server/API.hs
blob: fe3671e7aa3e52522eca75f96b782d91749c22d4 (plain) (blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
{-# 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