remove patch that is no longer needed
This commit is contained in:
parent
eeb4182cb2
commit
ebd9f70ceb
2 changed files with 0 additions and 33 deletions
|
@ -1,32 +0,0 @@
|
|||
From 2d1f0027ae1ca56bbf4449887cf3bc61dc1c8e84 Mon Sep 17 00:00:00 2001
|
||||
From: foo <foo@bar>
|
||||
Date: Sat, 21 Sep 2013 22:32:01 +0000
|
||||
Subject: [PATCH] fix build with new ghc
|
||||
|
||||
---
|
||||
Data/HashMap/Base.hs | 4 ++--
|
||||
1 file changed, 2 insertions(+), 2 deletions(-)
|
||||
|
||||
diff --git a/Data/HashMap/Base.hs b/Data/HashMap/Base.hs
|
||||
index 6a77df4..93a384d 100644
|
||||
--- a/Data/HashMap/Base.hs
|
||||
+++ b/Data/HashMap/Base.hs
|
||||
@@ -86,7 +86,7 @@ import qualified Data.List as L
|
||||
import Data.Monoid (Monoid(mempty, mappend))
|
||||
import Data.Traversable (Traversable(..))
|
||||
import Data.Word (Word)
|
||||
-import GHC.Exts ((==#), build, reallyUnsafePtrEquality#)
|
||||
+import GHC.Exts ((==#), build, reallyUnsafePtrEquality#, tagToEnum#)
|
||||
import Prelude hiding (filter, foldr, lookup, map, null, pred)
|
||||
|
||||
import qualified Data.HashMap.Array as A
|
||||
@@ -1072,5 +1072,5 @@ fullNodeMask = complement (complement 0 `unsafeShiftL` maxChildren)
|
||||
-- | Check if two the two arguments are the same value. N.B. This
|
||||
-- function might give false negatives (due to GC moving objects.)
|
||||
ptrEq :: a -> a -> Bool
|
||||
-ptrEq x y = reallyUnsafePtrEquality# x y ==# 1#
|
||||
+ptrEq x y = tagToEnum# (reallyUnsafePtrEquality# x y ==# 1#)
|
||||
{-# INLINE ptrEq #-}
|
||||
--
|
||||
1.7.10.4
|
||||
|
|
@ -68,7 +68,6 @@ install_pkgs () {
|
|||
patched MissingH
|
||||
patched bloomfilter
|
||||
patched SafeSemaphore
|
||||
patched unordered-containers
|
||||
patched comonad
|
||||
patched HTTP
|
||||
patched MonadCatchIO-transformers
|
||||
|
|
Loading…
Reference in a new issue