1 files changed, 4 insertions, 1 deletions

diff --git a/ToxAddress.hs b/ToxAddress.hs
index f0d4aba3..ea69f6e3 100644
--- a/ToxAddress.hs
+++ b/ToxAddress.hs
@@ -13,7 +13,7 @@
 {-# LANGUAGE ScopedTypeVariables        #-}
 {-# LANGUAGE TupleSections              #-}
 {-# LANGUAGE TypeApplications           #-}
-module ToxAddress (NodeInfo(..),NodeId(..),nodeInfo) where
+module ToxAddress (NodeInfo(..),NodeId(..),nodeInfo,zeroID) where
 
 import Control.Applicative
 import Control.Monad
@@ -88,6 +88,9 @@ instance S.Serialize NodeId where
 
 instance Bits NodeId where -- TODO
 
+instance Hashable NodeId where
+    hashWithSalt salt (NodeId key) = hashWithSalt salt (BA.convert key :: ByteString)
+
 instance FiniteBits NodeId where
     finiteBitSize _ = 256