Block
struct Block *b_HNext; /* must be first field */
static Block **BlockHash;
Block *base;
base = calloc(sizeof(Block), NBlocks);
BlockHash = calloc(sizeof(Block *), HSize);
Block *blk;
Block **pblk;
Block **ppblk;