From: simonmar <unknown>
Date: Thu, 9 May 2002 13:09:30 +0000 (+0000)
Subject: [project @ 2002-05-09 13:09:30 by simonmar]
X-Git-Tag: nhc98-1-18-release~1036
X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=3742ec445c4a37d4897313b50ab95310ea55844e;p=haskell-directory.git

[project @ 2002-05-09 13:09:30 by simonmar]
singletonSet has been deprecated for a while; remove it now
---

diff --git a/Data/Set.hs b/Data/Set.hs
index 556bbc1..f4dad32 100644
--- a/Data/Set.hs
+++ b/Data/Set.hs
@@ -19,7 +19,6 @@ module Data.Set (
 	mkSet,          -- :: Ord a => [a]  -> Set a
 	setToList,      -- :: Set a -> [a] 
 	unitSet,        -- :: a -> Set a
-	singletonSet,   -- :: a -> Set a
 
 	union,          -- :: Ord a => Set a -> Set a -> Set a
 	unionManySets,  -- :: Ord a => [Set a] -> Set a
@@ -49,9 +48,6 @@ emptySet = MkSet emptyFM
 unitSet :: a -> Set a
 unitSet x = MkSet (unitFM x ())
 
-{-# DEPRECATED singletonSet "use Set.unitSet" #-}
-singletonSet = unitSet -- old;deprecated.
-
 setToList :: Set a -> [a]
 setToList (MkSet set) = keysFM set