diff options
| author | Sam T <pxqr.sta@gmail.com> | 2013-07-09 00:40:37 +0400 |
|---|---|---|
| committer | Sam T <pxqr.sta@gmail.com> | 2013-07-09 00:40:37 +0400 |
| commit | 329f0951e38bd6b04347a7d46710392fe7b18c8e (patch) | |
| tree | a738e2e7d9a02a1d226930a9bf322451a94a68cb /src | |
| parent | f55c684b641a4fa593ce0f124f06401ddc0b5487 (diff) | |
~ Fix documentation markup.
Diffstat (limited to 'src')
| -rw-r--r-- | src/Remote/KRPC/Protocol.hs | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/src/Remote/KRPC/Protocol.hs b/src/Remote/KRPC/Protocol.hs index 0cbb041d..a569066f 100644 --- a/src/Remote/KRPC/Protocol.hs +++ b/src/Remote/KRPC/Protocol.hs | |||
| @@ -60,7 +60,7 @@ import Network.Socket.ByteString | |||
| 60 | -- | 60 | -- |
| 61 | -- Errors are encoded as bencoded dictionary: | 61 | -- Errors are encoded as bencoded dictionary: |
| 62 | -- | 62 | -- |
| 63 | -- { "y" : "e", "e" : [<error_code>, <human_readable_error_reason>] } | 63 | -- > { "y" : "e", "e" : [<error_code>, <human_readable_error_reason>] } |
| 64 | -- | 64 | -- |
| 65 | data KError | 65 | data KError |
| 66 | -- | Some error doesn't fit in any other category. | 66 | -- | Some error doesn't fit in any other category. |
| @@ -123,7 +123,7 @@ type ParamName = ByteString | |||
| 123 | -- | 123 | -- |
| 124 | -- Queries are encoded as bencoded dictionary: | 124 | -- Queries are encoded as bencoded dictionary: |
| 125 | -- | 125 | -- |
| 126 | -- { "y" : "q", "q" : "<method_name>", "a" : [<arg1>, <arg2>, ...] } | 126 | -- > { "y" : "q", "q" : "<method_name>", "a" : [<arg1>, <arg2>, ...] } |
| 127 | -- | 127 | -- |
| 128 | data KQuery = KQuery { | 128 | data KQuery = KQuery { |
| 129 | queryMethod :: MethodName | 129 | queryMethod :: MethodName |
| @@ -163,7 +163,7 @@ type ValName = ByteString | |||
| 163 | -- | 163 | -- |
| 164 | -- Responses are encoded as bencoded dictionary: | 164 | -- Responses are encoded as bencoded dictionary: |
| 165 | -- | 165 | -- |
| 166 | -- { "y" : "r", "r" : [<val1>, <val2>, ...] } | 166 | -- > { "y" : "r", "r" : [<val1>, <val2>, ...] } |
| 167 | -- | 167 | -- |
| 168 | newtype KResponse = KResponse { | 168 | newtype KResponse = KResponse { |
| 169 | respVals :: Map ValName BEncode | 169 | respVals :: Map ValName BEncode |