module Main where import Network.Wai import Network.Wai.Handler.Warp import API main :: IO () main = runApp 3000 "pastecan.db"