fradrive/src/Data/Set/Instances.hs
Gregor Kleen 5b6c35fedd Cleanup
2019-04-15 16:41:14 +02:00

15 lines
270 B
Haskell

{-# OPTIONS_GHC -fno-warn-orphans #-}
module Data.Set.Instances
(
) where
import ClassyPrelude
import Data.Set (Set)
import qualified Data.Set as Set
instance (Ord a, Hashable a) => Hashable (Set a) where
hashWithSalt s xs = hashWithSalt s $ Set.toAscList xs