12 lines
185 B
Haskell
12 lines
185 B
Haskell
|
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
|
||
|
|