diff options
Diffstat (limited to 'src/Network/KRPC')
-rw-r--r-- | src/Network/KRPC/Method.hs | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/src/Network/KRPC/Method.hs b/src/Network/KRPC/Method.hs index 2033f808..a31380cc 100644 --- a/src/Network/KRPC/Method.hs +++ b/src/Network/KRPC/Method.hs | |||
@@ -35,6 +35,7 @@ import Data.String | |||
35 | import Data.Typeable | 35 | import Data.Typeable |
36 | import Network.DatagramServer.Mainline | 36 | import Network.DatagramServer.Mainline |
37 | import Network.DatagramServer.Types | 37 | import Network.DatagramServer.Types |
38 | import Network.DHT.Types | ||
38 | 39 | ||
39 | 40 | ||
40 | -- | Method datatype used to describe method name, parameters and | 41 | -- | Method datatype used to describe method name, parameters and |
@@ -105,3 +106,5 @@ class ( Typeable req, Typeable resp) | |||
105 | validateExchange :: dht req -> dht resp -> Bool | 106 | validateExchange :: dht req -> dht resp -> Bool |
106 | validateExchange _ _ = True | 107 | validateExchange _ _ = True |
107 | 108 | ||
109 | makeQueryExtra :: DHTData dht ip -> Proxy req -> Proxy resp -> IO (QueryExtra dht) | ||
110 | makeResponseExtra :: DHTData dht ip -> req -> Proxy resp -> IO (ResponseExtra dht) | ||