-main :: IO ()
-main = let config = defaultConfig { cnfServerPort = PortNumber 9999 }
- resources = mkResTree [ ([], smallFile) ]
+main ∷ IO ()
+main = let config = defaultConfig { cnfServerPort = "9999" }
+ tree ∷ ResourceTree
+ tree = C.fromList [ ([], nonGreedy smallFile) ]