servant-swagger-1.2.2: example/server/Main.hs

module Main where

import Network.Wai.Handler.Warp
import Servant

import Todo

main :: IO ()
main = do
  putStrLn "Running on port 8000"
  run 8000 $ serve (Proxy :: Proxy API) server