FpDebug: Do not stop on lines with unknown line info (linenr=0)

git-svn-id: trunk@47222 -
This commit is contained in:
joost 2014-12-19 10:42:19 +00:00
parent f6bbc53755
commit f4818c2bfd

View File

@ -1043,6 +1043,8 @@ begin
if (((FStoreStepSrcFilename=sym.FileName) and (FStoreStepSrcLineNo=sym.Line)) {or FStepOut}) and
(FStoreStepFuncAddr=sym.Address.Address) then
result := dcsiSameLine
else if sym.Line = 0 then
result := dcsiNoLineInfo
else
result := dcsiNewLine;
sym.ReleaseReference;