we have a running webserver (nothing tested)

app/Main.hs

@@ -1,6 +1,17 @@
 module Main where
 
-import Lib
+-- TODO:
+-- We need some logic to compile with different backends. Right now we only
+-- support warp. But a (fast) cgi backend would be nice too.
+
+-- TODO:
+-- We need some way too configure things, like the port we run on.
+-- see Network.Wai.Handler.Warp.Settings and Network.Wai.Handler.Warp.runSettings
+import WaiApp
+import Control.Concurrent.MVar
+import Network.Wai.Handler.Warp
 
 main :: IO ()
-main = someFunc
+main = do
+  serverState <- newMVar newServerState
+  run 8080 $ waiApplication serverState