eeva/servant
1
0
Fork 0
Code Issues Pull requests Projects Releases Wiki Activity

Add (basic) API docs for ServerT (#1573)

Browse source
This commit is contained in:
Daan Rijks 2023-01-09 17:05:08 +01:00 committed by GitHub
parent a22600979a
commit 2daae80ea8
No known key found for this signature in database
GPG key ID: 4AEE18F83AFDEB23
2 changed files with 6 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
changelog.d/1573 Normal file
View file

@ -0,0 +1,2 @@
synopsis: Add API docs for ServerT
prs: #1573

4
servant-server/src/Servant/Server/Internal.hs
View file

@ -116,6 +116,10 @@ import Servant.API.TypeLevel
(AtLeastOneFragment, FragmentUnique) (AtLeastOneFragment, FragmentUnique)
class HasServer api context where class HasServer api context where
-- | The type of a server for this API, given a monad to run effects in.
--
-- Note that the result kind is @*@, so it is /not/ a monad transformer, unlike
-- what the @T@ in the name might suggest.
type ServerT api (m :: * -> *) :: * type ServerT api (m :: * -> *) :: *
route :: route ::