git.iko.soy/typeable/wai
on wai-extra/2.0.1.2 help sign in
typeable/wai/wai-handler-devel/run-smallapp.hs
6 lines 166 B history raw
1import Network.Wai.Handler.DevelServer (runQuit)
3main :: IO ()
4main = do
5 putStrLn "http://localhost:3000"
6 runQuit 3000 "SmallApp" "smallApp" (const $ return [])