diff options
| author | Joe Crayne <joe@jerkface.net> | 2018-12-06 21:32:55 -0500 |
|---|---|---|
| committer | Joe Crayne <joe@jerkface.net> | 2018-12-16 14:08:26 -0500 |
| commit | df6292eef942c11b9ac58b337f29641dae404116 (patch) | |
| tree | 4e034469484f79f06bb95d72a666e2f3f326f2b2 /src/Network/Tox/NodeId.hs | |
| parent | 3bb64acc07833b81b6e6cdb8fff3768a142d5be6 (diff) | |
Intances for TCP.NodeInfo.
Diffstat (limited to 'src/Network/Tox/NodeId.hs')
| -rw-r--r-- | src/Network/Tox/NodeId.hs | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/src/Network/Tox/NodeId.hs b/src/Network/Tox/NodeId.hs index 56ddf03c..98be1e3a 100644 --- a/src/Network/Tox/NodeId.hs +++ b/src/Network/Tox/NodeId.hs | |||
| @@ -335,6 +335,8 @@ instance Read NodeInfo where | |||
| 335 | return $ NodeInfo nid ip port | 335 | return $ NodeInfo nid ip port |
| 336 | 336 | ||
| 337 | -- The Hashable instance depends only on the IP address and port number. | 337 | -- The Hashable instance depends only on the IP address and port number. |
| 338 | -- | ||
| 339 | -- TODO: Why is the node id excluded? | ||
| 338 | instance Hashable NodeInfo where | 340 | instance Hashable NodeInfo where |
| 339 | hashWithSalt s ni = hashWithSalt s (nodeIP ni , nodePort ni) | 341 | hashWithSalt s ni = hashWithSalt s (nodeIP ni , nodePort ni) |
| 340 | {-# INLINE hashWithSalt #-} | 342 | {-# INLINE hashWithSalt #-} |