paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-16 03:59:17 +02:00
Code Issues Packages Projects Releases Wiki Activity

lazdebuggers: fixed crash if watchlist empty, bug #29238 form Anton

Browse Source 
git-svn-id: branches/fixes_1_6@51000 -
This commit is contained in:
mattias 2015-12-22 22:43:50 +00:00
parent 7b8e54a4a7
commit a3fcea8852
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
components/lazdebuggers/lazdebuggerfp/fpdebugdebugger.pas
View File

@ -1752,7 +1752,8 @@ begin
inherited DoState(OldState);
if not (State in [dsPause, dsInternalPause]) then
begin
FWatchEvalList.Clear;
if Assigned(FWatchEvalList) then
FWatchEvalList.Clear;
FWatchAsyncQueued := False;
end;
finally