module Data.Hashable.Orphans () where import Data.Hashable (Hashable(hashWithSalt)) import Data.Foldable import Data.SortedList import Data.Time.Clock.Compat instance Hashable a => Hashable (SortedList a) where hashWithSalt :: Int -> SortedList a -> Int hashWithSalt Int s = forall a. Hashable a => Int -> a -> Int hashWithSalt Int s forall b c a. (b -> c) -> (a -> b) -> a -> c . forall (t :: * -> *) a. Foldable t => t a -> [a] toList