2016-02-17 20:59:58 +01:00
|
|
|
{-# LANGUAGE DataKinds #-}
|
|
|
|
{-# LANGUAGE DeriveDataTypeable #-}
|
|
|
|
{-# LANGUAGE KindSignatures #-}
|
|
|
|
{-# LANGUAGE PolyKinds #-}
|
|
|
|
module Servant.API.Auth where
|
|
|
|
|
|
|
|
import Data.Typeable (Typeable)
|
|
|
|
|
|
|
|
-- | A generalized Authentication combinator. Use this if you have a
|
|
|
|
-- non-standard authentication technique.
|
2016-02-17 22:01:54 +01:00
|
|
|
--
|
|
|
|
-- NOTE: THIS API IS EXPERIMENTAL AND SUBJECT TO CHANGE.
|
2016-02-17 20:59:58 +01:00
|
|
|
data AuthProtect (tag :: k) deriving (Typeable)
|
|
|
|
|