Source position: exec.pas line 352
type TFreeBlocksData = record
fbd_NumBlocks: LongWord;
fbd_Blocks: array [0..0] of TMemEntry;
end;