diff --git a/CHANGELOG b/CHANGELOG
--- a/CHANGELOG
+++ b/CHANGELOG
@@ -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
diff --git a/psqueues.cabal b/psqueues.cabal
--- a/psqueues.cabal
+++ b/psqueues.cabal
@@ -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>
diff --git a/src/Data/OrdPSQ/Internal.hs b/src/Data/OrdPSQ/Internal.hs
--- a/src/Data/OrdPSQ/Internal.hs
+++ b/src/Data/OrdPSQ/Internal.hs
@@ -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 []