Haskell: simplest warp app