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

FpDebugger (pure): watches error checking

Browse Source 
git-svn-id: trunk@44920 -
This commit is contained in:
martin 2014-05-05 03:06:28 +00:00
parent 60aa4dd2fc
commit 9056ee62b2
1 changed files with 1 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

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

@ -662,6 +662,7 @@ begin
APasExpr := TFpPascalExpression.Create(AWatchValue.Expression, AContext);
try
APasExpr.ResultValue; // trigger full validation
if not APasExpr.Valid then
begin
AWatchValue.Value := ErrorHandler.ErrorAsString(APasExpr.Error);