{-# LANGUAGE DataKinds #-}

module Hercules.API.ClientInfo where

import Hercules.API.ClientInfo.ClientInfo (ClientInfo)
import Hercules.API.Prelude
import Servant.API

data ClientInfoAPI auth f = ClientInfoAPI
  { forall auth f.
ClientInfoAPI auth f
-> f :- ("client" :> ("info" :> (auth :> Get '[JSON] ClientInfo)))
getClientInfo ::
      f
        :- "client"
          :> "info"
          :> auth
          :> Get '[JSON] ClientInfo
  }
  deriving (forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
forall auth f x.
Rep (ClientInfoAPI auth f) x -> ClientInfoAPI auth f
forall auth f x.
ClientInfoAPI auth f -> Rep (ClientInfoAPI auth f) x
$cto :: forall auth f x.
Rep (ClientInfoAPI auth f) x -> ClientInfoAPI auth f
$cfrom :: forall auth f x.
ClientInfoAPI auth f -> Rep (ClientInfoAPI auth f) x
Generic)