summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--CryptoTransport.hs4
1 files changed, 2 insertions, 2 deletions
diff --git a/CryptoTransport.hs b/CryptoTransport.hs
index ddf1a558..37f91369 100644
--- a/CryptoTransport.hs
+++ b/CryptoTransport.hs
@@ -24,10 +24,10 @@ data NetCrypto
24 | NetCrypto (CryptoPacket Encrypted) 24 | NetCrypto (CryptoPacket Encrypted)
25 25
26parseNetCrypto :: ByteString -> SockAddr -> Either String (NetCrypto, SockAddr) 26parseNetCrypto :: ByteString -> SockAddr -> Either String (NetCrypto, SockAddr)
27parseNetCrypto = _todo 27parseNetCrypto _ _ = Left "TODO: parseNetCrypto"
28 28
29encodeNetCrypto :: NetCrypto -> SockAddr -> (ByteString, SockAddr) 29encodeNetCrypto :: NetCrypto -> SockAddr -> (ByteString, SockAddr)
30encodeNetCrypto = _todo 30encodeNetCrypto _ _ = _todo
31 31
32data Handshake (f :: * -> *) = Handshake 32data Handshake (f :: * -> *) = Handshake
33 { handshakeCookie :: Cookie 33 { handshakeCookie :: Cookie