From 7beb29d1bbe3059de6227632dfb8d44466031c85 Mon Sep 17 00:00:00 2001 From: Ben Sima Date: Tue, 20 Oct 2020 17:27:13 -0400 Subject: [PATCH] document what this argument is --- Urbit/Airlock.hs | 8 +++++++- 1 file changed, 7 insertions(+), 1 deletion(-) diff --git a/Urbit/Airlock.hs b/Urbit/Airlock.hs index f9303ce..326a279 100644 --- a/Urbit/Airlock.hs +++ b/Urbit/Airlock.hs @@ -110,7 +110,13 @@ ack sess ship eventId = ] -- | -subscribe :: Ship -> Path -> OutputStream ByteString -> IO () +subscribe :: + Ship -> + Path -> + -- | A handler function to receiv the response from the server, e.g. + -- 'System.IO.Streams.stdout`. + OutputStream ByteString -> + IO () subscribe ship path outfn = Client.get addr handle where handle :: Response -> InputStream ByteString -> IO ()