blob: 7bcf72a798c4fcf030855fd676f146786c4a0940 (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
|
{-# LANGUAGE TypeOperators #-}
module Endpoints.ServerLib (server) where
import Servant
import Endpoints.WellKnownEndpoint
import Endpoints.APILib
import Endpoints.VersionsEndpoint
import Endpoints.LoginEndpoint
import Endpoints.ProfileEndpoint
----------------------------------------------------------------------------------------------------
server :: Server API
server = wellKnownServer
:<|> versionsServer
:<|> loginServer
:<|> profileServer
|