psqueues 0.2.4.0 → 0.2.5.0
raw patch · 3 files changed
+7/−5 lines, 3 filesdep ~basePVP ok
version bump matches the API change (PVP)
Dependency ranges changed: base
API changes (from Hackage documentation)
Files
- CHANGELOG +3/−0
- psqueues.cabal +1/−1
- src/Data/OrdPSQ/Internal.hs +3/−4
CHANGELOG view
@@ -1,3 +1,6 @@+- 0.2.5.0 (2018-01-18)+ * Fix build on GHC 8.4+ - 0.2.4.0 (2017-09-27) * Add `unsafeMapMonotonic` * Lower build depends version for hashable
psqueues.cabal view
@@ -1,5 +1,5 @@ Name: psqueues-Version: 0.2.4.0+Version: 0.2.5.0 License: BSD3 License-file: LICENSE Maintainer: Jasper Van der Jeugt <jaspervdj@gmail.com>
src/Data/OrdPSQ/Internal.hs view
@@ -305,7 +305,7 @@ toAscLists t = case tourView t of Null -> emptySequ Single (E k p v) -> singleSequ (k, p, v)- Play tl tr -> toAscLists tl <> toAscLists tr+ Play tl tr -> toAscLists tl `appendSequ` toAscLists tr --------------------------------------------------------------------------------@@ -693,9 +693,8 @@ singleSequ :: a -> Sequ a singleSequ a = Sequ (\as -> a : as) -(<>) :: Sequ a -> Sequ a -> Sequ a-Sequ x1 <> Sequ x2 = Sequ (\as -> x1 (x2 as))-infixr 5 <>+appendSequ :: Sequ a -> Sequ a -> Sequ a+appendSequ (Sequ x1) (Sequ x2) = Sequ (\as -> x1 (x2 as)) seqToList :: Sequ a -> [a] seqToList (Sequ x) = x []