anchor.diff:    parent    : TDwarfEntry;
     prev      : TDwarfEntry;
     newdw     : TDwarfEntry;
  +  t   : TDwarfEntry;
   begin
     abbr:=TAbbrevTable.Create(Abbrevs, AbbrevOfs, AbbrevsSize);  
     
  
positive.code:   // we don't know the number of abbrevs for this unit,
    // but we cannot go beyond the section limit, so use that as safetylimit
    // in case of corrupt data
    i:=0;
    MaxData:=Offset+Size;
    while (i < MaxData) and (AData[i] <> 0) do begin
      abbrev := ULEB128toOrdinal(AData, i);
      tagnum := ULEB128toOrdinal(AData, i);
  
negative.code:     end else begin
        
        if not abbr.GetDefintion(Abbrev, Def)  then begin
          WriteLn('Error: Abbrev not found: ', Abbrev,' i=',i);
          Break;
        end;
        
  