diff options
| author | joe <joe@jerkface.net> | 2017-06-22 02:35:29 -0400 |
|---|---|---|
| committer | joe <joe@jerkface.net> | 2017-06-22 02:35:29 -0400 |
| commit | 05e70386c2248d87a61a8e8267e0211597f2fa88 (patch) | |
| tree | 5ac4d86c8d69c6dddd9840f8cb6efda9288e1a38 /src/Network/KRPC | |
| parent | e0ada56c116255a2feddcf7b09cec808f79afefc (diff) | |
Simplified KRPC class.
Diffstat (limited to 'src/Network/KRPC')
| -rw-r--r-- | src/Network/KRPC/Method.hs | 5 |
1 files changed, 0 insertions, 5 deletions
diff --git a/src/Network/KRPC/Method.hs b/src/Network/KRPC/Method.hs index ea11720c..3a2bd020 100644 --- a/src/Network/KRPC/Method.hs +++ b/src/Network/KRPC/Method.hs | |||
| @@ -97,8 +97,6 @@ class ( Typeable req, Typeable resp | |||
| 97 | ) | 97 | ) |
| 98 | => KRPC req resp | req -> resp, resp -> req where | 98 | => KRPC req resp | req -> resp, resp -> req where |
| 99 | 99 | ||
| 100 | type Envelope req resp | ||
| 101 | |||
| 102 | -- | Method name. Default implementation uses lowercased @req@ | 100 | -- | Method name. Default implementation uses lowercased @req@ |
| 103 | -- datatype name. | 101 | -- datatype name. |
| 104 | -- | 102 | -- |
| @@ -111,6 +109,3 @@ class ( Typeable req, Typeable resp | |||
| 111 | where | 109 | where |
| 112 | hole = error "krpc.method: impossible" :: req | 110 | hole = error "krpc.method: impossible" :: req |
| 113 | #endif | 111 | #endif |
| 114 | |||
| 115 | unseal :: Envelope req resp -> Either String req | ||
| 116 | seal :: resp -> Envelope req resp | ||