From 3742ec445c4a37d4897313b50ab95310ea55844e Mon Sep 17 00:00:00 2001
From: simonmar <unknown>
Date: Thu, 9 May 2002 13:09:30 +0000
Subject: [PATCH] [project @ 2002-05-09 13:09:30 by simonmar] singletonSet has
 been deprecated for a while; remove it now

---
 Data/Set.hs |    4 ----
 1 file changed, 4 deletions(-)

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
 
-- 
1.7.10.4