anchor.diff:      property Reg[const Name: String]: TDbgData read GetRegister; default;
       function RegByIndex(idx: Integer): TDbgData; virtual; abstract;
     end;
  -  
  +
     TDbgEventKind = (
  -    dek_Other, dek_SysExc, dek_SingleStep, dek_BreakPoint, 
  +    dek_Other, dek_SysExc, dek_SingleStep, dek_BreakPoint,
       dek_ProcessStart, dek_ProcessTerminated,
       dek_ThreadStart, dek_ThreadTerminated,
       dek_SysCall);
  -  
  +
     TDbgEvent = record
       Addr    : TDbgPtr;
       Process : TDbgProcessID;
       Thread  : TDbgThreadID;
       Kind    : TDbgEventKind;
       Debug   : String;
  -  end;   
  -  
  +  end;
  +
     TDbgRunMode = (drm_Normal, drm_Suspended, drm_SingleStep);
  -  
  +
     { TDbgTarget }
   
     TDbgTarget = class(TObject) {TDbgSysAPI}
  
positive.code:   SetValue(AValue, 8);
  end;
  
  procedure TDbgData.SetUInt8(const AValue: Byte); 
  begin
    SetValue(AValue, 8);
  end;
  
negative.code: 
  { TDbgRegister }
  
  function TDbgData.GetUInt8: Byte;
  begin
    GetValue(Result, 8);
  end;
  