Source position: cachecls.pp line 45
type TCacheSlot = record
Prev: PCacheSlot;
Next: PCacheSlot;
Data: Pointer;
Index: Integer;
end;