-- | Number of records before each block is flushed and added to the block index
recordsPerBlock :: Int
recordsPerBlock = 0x10000
recordsPerBlock :: Int
recordsPerBlock = 0x10000
recordsPerBlock = 0x10000