Servant.Auth.Server.Internal.AddSetCookie

Documentation

data Nat

Constructors

Z

S Nat

type family AddSetCookiesApi (n :: Nat) a where ...

Equations

AddSetCookiesApi (S Z) a = AddSetCookieApi a

AddSetCookiesApi (S n) a = AddSetCookiesApi n (AddSetCookieApi a)

type family AddSetCookieApiVerb a where ...

Equations

AddSetCookieApiVerb (Headers ls a) = Headers (Header "Set-Cookie" SetCookie ': ls) a

AddSetCookieApiVerb a = Headers '[Header "Set-Cookie" SetCookie] a

type family AddSetCookieApi a :: *

Instances

type AddSetCookieApi Raw

type AddSetCookieApi Raw = Raw

type AddSetCookieApi ((:<|>) a b)

type AddSetCookieApi ((:<|>) a b) = (:<|>) (AddSetCookieApi a) (AddSetCookieApi b)

type AddSetCookieApi ((:>) k * a b)

type AddSetCookieApi ((:>) k * a b) = (:>) k * a (AddSetCookieApi b)

type AddSetCookieApi (Verb k1 * method stat ctyps a)

type AddSetCookieApi (Verb k1 * method stat ctyps a) = Verb k1 * method stat ctyps (AddSetCookieApiVerb a)

data SetCookieList (n :: Nat) :: * where

Constructors

SetCookieNil :: SetCookieList Z

SetCookieCons :: Maybe SetCookie -> SetCookieList n -> SetCookieList (S n)

class AddSetCookies (n :: Nat) orig new where

Minimal complete definition

addSetCookies

Methods

addSetCookies :: SetCookieList n -> orig -> new

Instances

AddSetCookies Z orig orig

Methods

addSetCookies :: SetCookieList Z -> orig -> orig

AddSetCookies (S n) Application Application

for servant <0.11

Methods

addSetCookies :: SetCookieList (S n) -> Application -> Application

(Functor m, AddSetCookies n (m old) (m cookied), AddHeader "Set-Cookie" SetCookie cookied new) => AddSetCookies (S n) (m old) (m new)

Methods

addSetCookies :: SetCookieList (S n) -> m old -> m new

(AddSetCookies (S n) a a', AddSetCookies (S n) b b') => AddSetCookies (S n) ((:<|>) a b) ((:<|>) a' b')

Methods

addSetCookies :: SetCookieList (S n) -> (a :<|> b) -> a' :<|> b'

AddSetCookies (S n) oldb newb => AddSetCookies (S n) (a -> oldb) (a -> newb)

Methods

addSetCookies :: SetCookieList (S n) -> (a -> oldb) -> a -> newb

AddSetCookies (S n) (Tagged k m Application) (Tagged k m Application)

for servant >=0.11

Methods

addSetCookies :: SetCookieList (S n) -> Tagged k m Application -> Tagged k m Application

mkHeaders :: SetCookieList x -> [Header]