@@ -78,8 +78,8 @@ server counter = counterPlusOne counter -- (+1) on the TVar
78 :<|> currentValue counter -- read the TVar
78 :<|> currentValue counter -- read the TVar
80server' :: TVar Counter -> Server TestApi'
80server' :: TVar Counter -> Server TestApi'
81−server counter = server counter
81+server' counter = server counter
82− :<|> serveDirectory www -- serve static files
82+ :<|> serveDirectory www -- serve static files
84runServer :: TVar Counter -- ^ shared variable for the counter
84runServer :: TVar Counter -- ^ shared variable for the counter
85 -> Int -- ^ port the server should listen on
85 -> Int -- ^ port the server should listen on