TFpDebugDebuggerBase

type TFpDebugDebuggerBase = class(TDebuggerIntf)

protected

  FDbgController: TDbgController;

  FMemManager: TFpDbgMemManager;

  FMemModel: TFpDbgMemModel;

  FMemReader: TDbgMemReader;

  FMemConverter: TFpDbgMemConvertor;

  FLockList: TFpDbgLockList;

  FWorkQueue: TFpThreadPriorityWorkerQueue;

  FCached_FPC_ANSISTR_DECR_REF: TDbgPtr;

  FCached_FPC_WIDESTR_DECR_REF: TDbgPtr;

  FCached_FPC_ANSISTR_SETLENGTH: TDbgPtr;

  FCached_FPC_WIDESTR_SETLENGTH: TDbgPtr;

  FCached_Data: TCachedDbgPtrMap;

  function GetCached_FPC_Func_Addr();

public

  destructor Destroy; override;

  function GetCached_FPC_ANSISTR_DECR_REF;

  function GetCached_FPC_WIDESTR_DECR_REF;

  function GetCached_FPC_ANSISTR_SETLENGTH;

  function GetCached_FPC_WIDESTR_SETLENGTH;

  procedure SetCachedData();

  function GetCachedData();

  procedure ClearCachedData;

  procedure CallTargetFuncStringDecRef();

  function CallTargetFuncStringSetLength();

  function CreateAnsiStringInTarget();

  function CreateWideStringInTarget();

  function ReadAnsiStringFromTarget();

  procedure BeforeWatchEval(); virtual; abstract;

  procedure RunProcessLoop(); virtual; abstract;

  property DbgController: TDbgController; [r]

  property MemManager: TFpDbgMemManager; [r]

  property MemReader: TDbgMemReader; [r]

  property MemConverter: TFpDbgMemConvertor; [r]

  property LockList: TFpDbgLockList; [r]

  property WorkQueue: TFpThreadPriorityWorkerQueue; [r]

end;

TFpDebugDebuggerBase

TObject