paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-06-11 09:58:17 +02:00
Code Issues Packages Projects Releases Wiki Activity

Marc wins

Browse Source 
git-svn-id: trunk@16351 -
This commit is contained in:
mattias 2008-09-01 13:14:17 +00:00
parent 751f2ae42a
commit fa30fe40de
1 changed files with 1 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
debugger/debugger.pp
View File

@ -1037,11 +1037,7 @@ type
class procedure SetProperties(const AProperties: TDebuggerProperties); // Set the current properties class procedure SetProperties(const AProperties: TDebuggerProperties); // Set the current properties
public public
constructor Create(const AExternalDebugger: String); virtual; {Virtual constructor makes no sense} constructor Create(const AExternalDebugger: String); virtual;
//MWE: there will be a day that they do make sense :-)
// MG: there will be a day that they do make troubles :)
//MWE: do they ?
//MWE: Now they do make sense !
destructor Destroy; override; destructor Destroy; override;
procedure Init; virtual; // Initializes the debugger procedure Init; virtual; // Initializes the debugger