diff options
Diffstat (limited to 'compiler/GHC/Data/EnumSet.hs')
| -rw-r--r-- | compiler/GHC/Data/EnumSet.hs | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/compiler/GHC/Data/EnumSet.hs b/compiler/GHC/Data/EnumSet.hs index 61d6bf002b..a7949c7e71 100644 --- a/compiler/GHC/Data/EnumSet.hs +++ b/compiler/GHC/Data/EnumSet.hs @@ -8,6 +8,7 @@ module GHC.Data.EnumSet , toList , fromList , empty + , difference ) where import GHC.Prelude @@ -33,3 +34,6 @@ fromList = EnumSet . IntSet.fromList . map fromEnum empty :: EnumSet a empty = EnumSet IntSet.empty + +difference :: EnumSet a -> EnumSet a -> EnumSet a +difference (EnumSet a) (EnumSet b) = EnumSet (IntSet.difference a b) |