@hackage / hack2-interface-wai

Hack2 interface to WAI

Latest2017.1.4

Metadata

Last updated 4 Jan 2017, by JinjingWang
License BSD-3-Clause
Categories Web Development
Maintained by: Jinjing Wang <nfjinjing@gmail.com>
Lottery factor: 0

Links

Homepage
Documentation
No source repository

Installation

Add this line in your cabal file

Readme

Interfacing Hack2 and Wai

Example: test/hello

{-# LANGUAGE OverloadedStrings #-}

import Hack2 
import Hack2.Interface.Wai (hackAppToWaiApp)
import Data.Default (def)
import Network.Wai.Handler.Warp (run)

app :: Application
app = \env -> 
  return $ 
      Response 200 [ ("Content-Type", "text/plain") ] "Hello World (Hack2 to Wai)"


main :: IO ()
main = do
    putStrLn $ "http://localhost:3000/"
    run 3000 (hackAppToWaiApp app)