servant-client-jsaddle: Remove some debug printing

This commit is contained in:
Robert Hensing 2019-01-31 03:41:19 +01:00 committed by Oleg Grenrus
parent a0b21fb1ff
commit 93f2e3eb37

View file

@ -39,9 +39,6 @@ data TestResponse = TestResponse { byteList :: [Word8] }
testServer :: Server TestApi testServer :: Server TestApi
testServer x = do testServer x = do
liftIO $ putStrLn "Hello tehre"
liftIO $ print x
liftIO $ hFlush stdout
pure . TestResponse . B.unpack $ x pure . TestResponse . B.unpack $ x
testClient :: Client ClientM TestApi testClient :: Client ClientM TestApi