Guest

Untitled

By: a guest on Jan 21st, 2012  |  syntax: Haskell  |  size: 0.19 KB  |  hits: 64  |  expires: Never
download  |  raw  |  embed  |  report abuse
Copied
  1. module Main where
  2.  
  3. import Control.Monad.Trans
  4. import Happstack.Server
  5.  
  6.  
  7. main :: IO ()
  8. main = simpleHTTP nullConf $ handler
  9.  
  10. handler :: ServerPartT IO [Char]
  11. handler = ok "hello world"