mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-08-29 19:10:25 +02:00
debuggerintf: less hints
git-svn-id: trunk@59208 -
This commit is contained in:
parent
21ce8c93c4
commit
14c6216cd1
@ -422,13 +422,13 @@ type
|
|||||||
FMaster: TDBGBreakPoint;
|
FMaster: TDBGBreakPoint;
|
||||||
procedure SetMaster(AValue: TDBGBreakPoint);
|
procedure SetMaster(AValue: TDBGBreakPoint);
|
||||||
protected
|
protected
|
||||||
procedure BeginUpdate; override;
|
|
||||||
procedure DoEndUpdate; override;
|
procedure DoEndUpdate; override;
|
||||||
procedure ReleaseMaster;
|
procedure ReleaseMaster;
|
||||||
property Master: TDBGBreakPoint read FMaster write SetMaster;
|
property Master: TDBGBreakPoint read FMaster write SetMaster;
|
||||||
// TODO: move TBaseBreakPoint properties from IDE te IDEBase
|
// TODO: move TBaseBreakPoint properties from IDE te IDEBase
|
||||||
public
|
public
|
||||||
destructor Destroy; override;
|
destructor Destroy; override;
|
||||||
|
procedure BeginUpdate; override;
|
||||||
end;
|
end;
|
||||||
|
|
||||||
{ TBaseBreakPoints }
|
{ TBaseBreakPoints }
|
||||||
@ -3708,8 +3708,6 @@ begin
|
|||||||
end;
|
end;
|
||||||
|
|
||||||
procedure TBaseBreakPoint.DoEndUpdate;
|
procedure TBaseBreakPoint.DoEndUpdate;
|
||||||
var
|
|
||||||
c: TDbgBpChangeIndicators;
|
|
||||||
begin
|
begin
|
||||||
inherited DoEndUpdate;
|
inherited DoEndUpdate;
|
||||||
MarkPropertiesChanged([]);
|
MarkPropertiesChanged([]);
|
||||||
|
Loading…
Reference in New Issue
Block a user