[Haskell-beginners] Simple warp-based server