summaryrefslogtreecommitdiff
path: root/utils/hpc/HpcSet.hs
diff options
context:
space:
mode:
Diffstat (limited to 'utils/hpc/HpcSet.hs')
-rw-r--r--utils/hpc/HpcSet.hs39
1 files changed, 0 insertions, 39 deletions
diff --git a/utils/hpc/HpcSet.hs b/utils/hpc/HpcSet.hs
deleted file mode 100644
index d5dfe38fc7..0000000000
--- a/utils/hpc/HpcSet.hs
+++ /dev/null
@@ -1,39 +0,0 @@
-module HpcSet ( module HpcSet ) where
-
-import qualified Data.Set as Set
-
-type Set a = Set.Set a
-
-empty :: Set a
-insert :: (Ord a) => a -> Set a -> Set a
-member :: (Ord a) => a -> Set a -> Bool
-null :: Set a -> Bool
-intersection :: Ord a => Set a -> Set a -> Set a
-fromList :: Ord a => [a] -> Set a
-toList :: Set a -> [a]
-union :: Ord a => Set a -> Set a -> Set a
-
-#if __GLASGOW_HASKELL__ < 604
-
-empty = Set.emptySet
-insert = flip Set.addToSet
-member = Set.elementOf
-null = Set.isEmptySet
-intersection = Set.intersect
-fromList = Set.mkSet
-toList = Set.setToList
-union = Set.union
-
-#else
-
-empty = Set.empty
-insert = Set.insert
-member = Set.member
-null = Set.null
-intersection = Set.intersection
-fromList = Set.fromList
-toList = Set.toList
-union = Set.union
-
-#endif
-