diff options
Diffstat (limited to 'src')
-rw-r--r-- | src/Network/QueryResponse.hs | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/src/Network/QueryResponse.hs b/src/Network/QueryResponse.hs index 7244304e..b7a402b4 100644 --- a/src/Network/QueryResponse.hs +++ b/src/Network/QueryResponse.hs | |||
@@ -147,7 +147,7 @@ forkListener name client = do | |||
147 | killThread thread_id | 147 | killThread thread_id |
148 | 148 | ||
149 | -- | Send a query to a remote peer. Note that this funciton will always time | 149 | -- | Send a query to a remote peer. Note that this funciton will always time |
150 | -- out if 'forkListener' was never invoked to spawn a thread receive and | 150 | -- out if 'forkListener' was never invoked to spawn a thread to receive and |
151 | -- dispatch the response. | 151 | -- dispatch the response. |
152 | sendQuery :: | 152 | sendQuery :: |
153 | forall err a b tbl x meth tid addr. | 153 | forall err a b tbl x meth tid addr. |
@@ -258,7 +258,7 @@ data MethodSerializer tid addr x meth a b = MethodSerializer | |||
258 | , method :: meth | 258 | , method :: meth |
259 | -- | Serialize the outgoing query /a/ into a transmitable packet /x/. | 259 | -- | Serialize the outgoing query /a/ into a transmitable packet /x/. |
260 | -- The /addr/ arguments are, respectively, our own origin address and the | 260 | -- The /addr/ arguments are, respectively, our own origin address and the |
261 | -- destination of the request. The /ctx/ argument is useful for attaching | 261 | -- destination of the request. The /tid/ argument is useful for attaching |
262 | -- auxillary notations on all outgoing packets. | 262 | -- auxillary notations on all outgoing packets. |
263 | , wrapQuery :: tid -> addr -> addr -> a -> x | 263 | , wrapQuery :: tid -> addr -> addr -> a -> x |
264 | -- | Parse an inbound packet /x/ into a response /b/ for this query. | 264 | -- | Parse an inbound packet /x/ into a response /b/ for this query. |
@@ -323,7 +323,7 @@ contramapT f (TableMethods ins del lookup) = | |||
323 | -- convenience to test if an integral type, such as 'Data.Word.Word64', can be | 323 | -- convenience to test if an integral type, such as 'Data.Word.Word64', can be |
324 | -- safely transformed into an 'Int' for use with 'IntMap'. | 324 | -- safely transformed into an 'Int' for use with 'IntMap'. |
325 | -- | 325 | -- |
326 | -- Returns 'True' if the proxied type can be losslessly convered to 'Int' using | 326 | -- Returns 'True' if the proxied type can be losslessly converted to 'Int' using |
327 | -- 'fromIntegral'. | 327 | -- 'fromIntegral'. |
328 | fitsInInt :: forall word. (Bounded word, Integral word) => Proxy word -> Bool | 328 | fitsInInt :: forall word. (Bounded word, Integral word) => Proxy word -> Bool |
329 | fitsInInt Proxy = (original == casted) | 329 | fitsInInt Proxy = (original == casted) |