我有使用wai的基本"hello world"应用程序设置,并且想使用wai-handler-devel,但我不确定如何去做它并且在wai项目中找不到它的任何使用示例.
{-# LANGUAGE OverloadedStrings #-}
import Network.Wai
import Network.HTTP.Types
import Network.Wai.Handler.Warp (run)
import Data.ByteString.Lazy.Char8 () -- Just for an orphan instance
app :: Application
app _ = return $ responseLBS
status200
[("Content-Type", "text/plain")]
"Hello, World!"
main :: IO ()
main = do
putStrLn $ "http://localhost:8080/"
run 8080 app
Run Code Online (Sandbox Code Playgroud)
我需要做些什么来让wai-handler-devel使用基本的wai应用程序?
注意:如果遇到"wai-handler-devel:command not found"的问题,可以在此处修复(https://gist.github.com/1499226)