src/ZcashHaskell/Types.hs

@@ -150,7 +150,7 @@ instance FromJSON ZebraGetInfo where
 -- | Type for the response from the `zebrad` RPC method `getblockchaininfo`
 data ZebraGetBlockChainInfo = ZebraGetBlockChainInfo
   { zgb_best :: !HexString
-  , zgb_blocks :: !Integer
+  , zgb_blocks :: !Int
   , zgb_net :: !ZcashNet
   } deriving (Prelude.Show, Eq)