diff --git a/CHANGELOG b/CHANGELOG
--- a/CHANGELOG
+++ b/CHANGELOG
@@ -1,3 +1,6 @@
+0.0.14:
+	* Use the correct data source for final live bytes total
+
 0.0.13:
 	* Forward arguments to the child process
 
diff --git a/src/Weigh/GHCStats.hs b/src/Weigh/GHCStats.hs
--- a/src/Weigh/GHCStats.hs
+++ b/src/Weigh/GHCStats.hs
@@ -51,7 +51,7 @@
 totalBytesAllocated = allocated_bytes
 
 liveBytes :: RTSStats -> Word64
-liveBytes = cumulative_live_bytes
+liveBytes = gcdetails_live_bytes . gc
 
 maxBytesInUse :: RTSStats -> Word64
 maxBytesInUse = max_live_bytes
@@ -61,14 +61,14 @@
 getGhcStatsSizeInBytes :: IO Int64
 getGhcStatsSizeInBytes = do
   s1 <- oneGetStats
-  s2 <- twoGetSTats
+  s2 <- twoGetStats
   return (fromIntegral (totalBytesAllocated s2 - totalBytesAllocated s1))
   where
     oneGetStats = do
       performGC
       !s <- getStats
       return s
-    twoGetSTats = do
+    twoGetStats = do
       performGC
       !_ <- getStats
       !s <- getStats
diff --git a/weigh.cabal b/weigh.cabal
--- a/weigh.cabal
+++ b/weigh.cabal
@@ -1,5 +1,5 @@
 name:                weigh
-version:             0.0.13
+version:             0.0.14
 synopsis:            Measure allocations of a Haskell functions/values
 description:         Please see README.md
 homepage:            https://github.com/fpco/weigh#readme