diff --git a/CHANGELOG.md b/CHANGELOG.md
--- a/CHANGELOG.md
+++ b/CHANGELOG.md
@@ -4,6 +4,10 @@
 The format is based on [Keep a Changelog](http://keepachangelog.com/en/1.0.0/)
 and this project adheres to [Semantic Versioning](http://semver.org/spec/v2.0.0.html)
 
+## 0.47.2
+### Fixed
+- Fix serialization bug for health check.
+
 ## 0.47.1
 ### Fixed
 - Fix serialization bugs for web data types.
diff --git a/haskoin-store.cabal b/haskoin-store.cabal
--- a/haskoin-store.cabal
+++ b/haskoin-store.cabal
@@ -4,10 +4,10 @@
 --
 -- see: https://github.com/sol/hpack
 --
--- hash: ff4a7aa140e43d4d77540711eef740057152592f5a48cdcd968ab1eca8176fbe
+-- hash: 1496ff19275a9949a906f360913bb037ff09b00be3a0be9024799df0ec21eb18
 
 name:           haskoin-store
-version:        0.47.1
+version:        0.47.2
 synopsis:       Storage and index for Bitcoin and Bitcoin Cash
 description:    Please see the README on GitHub at <https://github.com/haskoin/haskoin-store#readme>
 category:       Bitcoin, Finance, Network
@@ -61,7 +61,7 @@
     , hashable >=1.3.0.0
     , haskoin-core >=0.19.0
     , haskoin-node >=0.17.0
-    , haskoin-store-data ==0.47.1
+    , haskoin-store-data ==0.47.2
     , hedis >=0.12.13
     , http-types >=0.12.3
     , lens >=4.18.1
@@ -113,7 +113,7 @@
     , haskoin-core >=0.19.0
     , haskoin-node >=0.17.0
     , haskoin-store
-    , haskoin-store-data ==0.47.1
+    , haskoin-store-data ==0.47.2
     , hedis >=0.12.13
     , http-types >=0.12.3
     , lens >=4.18.1
@@ -170,7 +170,7 @@
     , haskoin-core >=0.19.0
     , haskoin-node >=0.17.0
     , haskoin-store
-    , haskoin-store-data ==0.47.1
+    , haskoin-store-data ==0.47.2
     , hedis >=0.12.13
     , hspec >=2.7.1
     , http-types >=0.12.3
diff --git a/src/Haskoin/Store/Web.hs b/src/Haskoin/Store/Web.hs
--- a/src/Haskoin/Store/Web.hs
+++ b/src/Haskoin/Store/Web.hs
@@ -1663,7 +1663,7 @@
                  => WebConfig -> m BlockHealth
 blockHealthCheck cfg = do
     let ch = storeChain $ webStore cfg
-        blockHealthMaxDiff = webMaxDiff cfg
+        blockHealthMaxDiff = fromIntegral $ webMaxDiff cfg
     blockHealthHeaders <-
         H.nodeHeight <$> chainGetBest ch
     blockHealthBlocks <-
@@ -1699,15 +1699,17 @@
 pendingTxsHealthCheck :: (MonadUnliftIO m, MonadLoggerIO m, StoreReadBase m)
                       => WebConfig -> m MaxHealth
 pendingTxsHealthCheck cfg = do
-    let maxHealthMax = webMaxPending cfg
-    maxHealthNum <- blockStorePendingTxs (storeBlock (webStore cfg))
+    let maxHealthMax = fromIntegral $ webMaxPending cfg
+    maxHealthNum <-
+        fromIntegral <$>
+        blockStorePendingTxs (storeBlock (webStore cfg))
     return MaxHealth {..}
 
 peerHealthCheck :: (MonadUnliftIO m, MonadLoggerIO m, StoreReadBase m)
                 => PeerManager -> m CountHealth
 peerHealthCheck mgr = do
     let countHealthMin = 1
-    countHealthNum <- length <$> getPeers mgr
+    countHealthNum <- fromIntegral . length <$> getPeers mgr
     return CountHealth {..}
 
 healthCheck :: (MonadUnliftIO m, MonadLoggerIO m, StoreReadBase m)