mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-09-11 09:10:47 +02:00
* no pushstatus in DoneDebugger because its called after App.done
This commit is contained in:
parent
1ca165a3b8
commit
1dbd0d4a64
@ -3029,7 +3029,8 @@ end;
|
||||
procedure DoneDebugger;
|
||||
begin
|
||||
{$ifdef DEBUG}
|
||||
PushStatus('Closing debugger');
|
||||
{ PushStatus('Closing debugger');
|
||||
No its called after App.Done !! }
|
||||
{$endif}
|
||||
if assigned(Debugger) then
|
||||
dispose(Debugger,Done);
|
||||
@ -3038,7 +3039,7 @@ begin
|
||||
If Use_gdb_file then
|
||||
Close(GDB_file);
|
||||
Use_gdb_file:=false;
|
||||
PopStatus;
|
||||
{PopStatus;}
|
||||
{$endif DEBUG}
|
||||
{DoneGDBWindow;}
|
||||
end;
|
||||
@ -3144,7 +3145,10 @@ end.
|
||||
|
||||
{
|
||||
$Log$
|
||||
Revision 1.48 2000-02-04 14:34:46 pierre
|
||||
Revision 1.49 2000-02-04 23:18:05 pierre
|
||||
* no pushstatus in DoneDebugger because its called after App.done
|
||||
|
||||
Revision 1.48 2000/02/04 14:34:46 pierre
|
||||
readme.txt
|
||||
|
||||
Revision 1.47 2000/02/04 00:10:58 pierre
|
||||
|
Loading…
Reference in New Issue
Block a user