diff options
Diffstat (limited to 'Hash.hs')
-rw-r--r-- | Hash.hs | 1 |
1 files changed, 1 insertions, 0 deletions
@@ -50,6 +50,7 @@ instance Hashable ControlAction where hash (SessionKey pk) = hash $ Tagged "SessionKey" pk hash (SessionKeyAccepted pk) = hash $ Tagged "SessionKeyAccepted" pk hash (SessionKeyRejected pk) = hash $ Tagged "SessionKeyRejected" pk + hash (ChatMessage u m) = hash $ Tagged "ChatMessage" [hash u, hash m] instance Hashable Signature where hash (Ed25519Signature s) = hash $ Tagged "Ed25519Signature" s |