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

Merge pull request #1566 from haskell-servant/fix-operator-doc

Browse Source 
Fix haddock documentation for (//) and (/:)
This commit is contained in:
Gaël Deest 2022-03-21 16:14:47 +01:00 committed by GitHub
commit af3dde1b1d
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
1 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
servant-client-core/src/Servant/Client/Core/HasClient.hs
View File

@ -874,7 +874,7 @@ infixl 2 /:
-- --
-- Example: -- Example:
-- --
-- @@ -- @
-- type Api = NamedRoutes RootApi -- type Api = NamedRoutes RootApi
-- --
-- data RootApi mode = RootApi -- data RootApi mode = RootApi
@ -895,7 +895,7 @@ infixl 2 /:
-- --
-- endpointClient :: ClientM Person -- endpointClient :: ClientM Person
-- endpointClient = client // subApi // endpoint -- endpointClient = client // subApi // endpoint
-- @@ -- @
(//) :: a -> (a -> b) -> b (//) :: a -> (a -> b) -> b
x // f = f x x // f = f x
@ -906,7 +906,7 @@ x // f = f x
-- --
-- Example: -- Example:
-- --
-- @@ -- @
-- type Api = NamedRoutes RootApi -- type Api = NamedRoutes RootApi
-- --
-- data RootApi mode = RootApi -- data RootApi mode = RootApi
@ -931,7 +931,7 @@ x // f = f x
-- --
-- endpointClient :: ClientM Person -- endpointClient :: ClientM Person
-- endpointClient = client // subApi /: "foobar123" // endpoint -- endpointClient = client // subApi /: "foobar123" // endpoint
-- @@ -- @
(/:) :: (a -> b -> c) -> b -> a -> c (/:) :: (a -> b -> c) -> b -> a -> c
(/:) = flip (/:) = flip