{-# 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