diff --git a/CHANGELOG.md b/CHANGELOG.md
new file mode 100644
--- /dev/null
+++ b/CHANGELOG.md
@@ -0,0 +1,6 @@
+## Version 0.8.0.2 (2019-11-28)
+
+- Bump upper bounds on primitive and QuickCheck.
+- Expose 'terminate' function from 'AmericanFlag' module.
+- Fix an off-by-one error in Data.Vector.Algorithms.Heaps.heapInsert.
+
diff --git a/src/Data/Vector/Algorithms/AmericanFlag.hs b/src/Data/Vector/Algorithms/AmericanFlag.hs
--- a/src/Data/Vector/Algorithms/AmericanFlag.hs
+++ b/src/Data/Vector/Algorithms/AmericanFlag.hs
@@ -28,6 +28,7 @@
 
 module Data.Vector.Algorithms.AmericanFlag ( sort
                                            , sortBy
+                                           , terminate
                                            , Lexicographic(..)
                                            ) where
 
diff --git a/src/Data/Vector/Algorithms/Heap.hs b/src/Data/Vector/Algorithms/Heap.hs
--- a/src/Data/Vector/Algorithms/Heap.hs
+++ b/src/Data/Vector/Algorithms/Heap.hs
@@ -265,8 +265,8 @@
  where
  sift k
    | k <= 0    = unsafeWrite v l e
-   | otherwise = let pi = l + shiftR (k-1) 2
-                  in unsafeRead v pi >>= \p -> case cmp p e of
+   | otherwise = let pi = shiftR (k-1) 2
+                  in unsafeRead v (l + pi) >>= \p -> case cmp p e of
                        LT -> unsafeWrite v (l + k) p >> sift pi
                        _  -> unsafeWrite v (l + k) e
 {-# INLINE heapInsert #-}
diff --git a/vector-algorithms.cabal b/vector-algorithms.cabal
--- a/vector-algorithms.cabal
+++ b/vector-algorithms.cabal
@@ -1,5 +1,5 @@
 name:              vector-algorithms
-version:           0.8.0.1
+version:           0.8.0.2
 license:           BSD3
 license-file:      LICENSE
 author:            Dan Doel
@@ -14,7 +14,9 @@
                    other vector algorithms may be added.
 build-type:        Simple
 cabal-version:     >= 1.9.2
+extra-source-files: CHANGELOG.md
 
+
 flag BoundsChecks
   description: Enable bounds checking
   default: True
@@ -55,7 +57,7 @@
 
   build-depends: base >= 4.5 && < 5,
                  vector >= 0.6 && < 0.13,
-                 primitive >=0.3 && <0.7,
+                 primitive >=0.3 && <0.8,
                  bytestring >= 0.9 && < 1.0
 
   if ! impl (ghc >= 7.8)
@@ -139,7 +141,7 @@
       base,
       bytestring,
       containers,
-      QuickCheck > 2.9 && < 2.13,
+      QuickCheck > 2.9 && < 2.14,
       vector,
       vector-algorithms