herringbone-0.0.6: test/TestServer.hs

module Main where

import TestHerringbone

main :: IO ()
main = do
    let port = 3002 :: Int
    putStrLn $ "starting test server on port " ++ show port ++ "..."
    runTestHB port