From 2e16195d151d401a664fa929604413aa613aa9f5 Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Sat, 20 May 2017 14:05:57 -0400 Subject: simplify, removing () instance --- Hash.hs | 5 +---- 1 file changed, 1 insertion(+), 4 deletions(-) diff --git a/Hash.hs b/Hash.hs index a76e0b4..89b0384 100644 --- a/Hash.hs +++ b/Hash.hs @@ -85,8 +85,5 @@ instance Hashable [Hash] where -- | Hash empty string for Nothing instance Hashable (Maybe Hash) where - hash Nothing = hash () + hash Nothing = hash (mempty :: B.ByteString) hash (Just v) = hash v - -instance Hashable () where - hash () = hash (mempty :: B.ByteString) -- cgit v1.2.3