remove no-longer-in-use HashSetBinary instance
commit7cd02a2cc5cad421e16445970545562eaafdee21
authorAgentM <agentm@themactionfaction.com>
dateSat 19 Sep 2015, 21:53 (11 years ago)
parent9949f44
ProjectM36/Base.hs−1
@@ -14,7 +14,6 @@ import qualified Data.List as L
1414import qualified Data.Text as T
1515import Data.Binary
1616import Data.Vector.Binary()
17−import ProjectM36.HashSetBinary ()
1817import Data.Time.Clock
1918import Data.Time.Clock.POSIX
2019import Data.Time.Calendar (Day,toGregorian,fromGregorian)
ProjectM36/HashSetBinary.hsdeleted−11
@@ -1,11 +0,0 @@
1−module ProjectM36.HashSetBinary where
2−import Data.Hashable
3−import qualified Data.HashSet as HS
4−import Data.Binary
5−
6−instance (Binary a, Hashable a, Eq a) => Binary (HS.HashSet a) where
7− put = put . HS.toList
8− get = do
9− list <- get :: (Binary a, Hashable a, Eq a) => Get [a]
10− return (HS.fromList list)
11−