-- | Serve the `API` on port 8080
main :: IO ()
main = do
    port <- options "CRUD server" (argInt "port" "The port to listen on")
    Warp.run port (serve (Proxy :: Proxy API) server)
main :: IO ()
main = do
    port <- options "CRUD server" (argInt "port" "The port to listen on")
    Warp.run port (serve (Proxy :: Proxy API) server)
main = do
    port <- options "CRUD server" (argInt "port" "The port to listen on")
    Warp.run port (serve (Proxy :: Proxy API) server)