summaryrefslogtreecommitdiff
path: root/compiler/GHC/Data/EnumSet.hs
diff options
context:
space:
mode:
Diffstat (limited to 'compiler/GHC/Data/EnumSet.hs')
-rw-r--r--compiler/GHC/Data/EnumSet.hs3
1 files changed, 2 insertions, 1 deletions
diff --git a/compiler/GHC/Data/EnumSet.hs b/compiler/GHC/Data/EnumSet.hs
index d364dc05d7..de462e2337 100644
--- a/compiler/GHC/Data/EnumSet.hs
+++ b/compiler/GHC/Data/EnumSet.hs
@@ -15,11 +15,12 @@ module GHC.Data.EnumSet
import GHC.Prelude
import GHC.Utils.Binary
+import Control.DeepSeq
import qualified Data.IntSet as IntSet
newtype EnumSet a = EnumSet IntSet.IntSet
- deriving (Semigroup, Monoid)
+ deriving (Semigroup, Monoid, NFData)
member :: Enum a => a -> EnumSet a -> Bool
member x (EnumSet s) = IntSet.member (fromEnum x) s