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

Fix spelling

Browse Source 
git-svn-id: trunk@59859 -
This commit is contained in:
martin 2018-12-19 00:37:00 +00:00
parent 22bf03c944
commit c3e01c7dc4
1 changed files with 5 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
components/lazdebuggers/lazdebuggerlldb/lldbdebugger.pas
View File

@ -110,7 +110,7 @@ type
FNextStepAction: TLldbInstructionProcessStepAction;
FWaitToResume: Boolean;
FCurBrkId, FTmpBreakId: Integer;
FUnknowStopReason: String;
FUnknownStopReason: String;
FThreadInstr: TLldbInstructionThreadList;
FCurrentExceptionInfo: record
FHasCommandData: TExceptionInfoCommands; // cleared in Setstate
@ -987,12 +987,12 @@ begin
//end else
//if StrStartsWith(found[1], 'watchpoint ') then begin
end else begin
FUnknowStopReason := '';
FUnknownStopReason := '';
if not( ( StrStartsWith(found[1], 'step ') or StrStartsWith(found[1], 'instruction step ') ) and
( StrContains(found[1], ' in') or StrContains(found[1], ' over') or StrContains(found[1], ' out') )
)
then
FUnknowStopReason := found[1];
FUnknownStopReason := found[1];
FCurBrkId := -1;
end;
@ -1034,8 +1034,8 @@ begin
DoBreakPointHit(FCurBrkId);
end
else
if FUnknowStopReason <> '' then begin
DoUnknownStopReason(FUnknowStopReason);
if FUnknownStopReason <> '' then begin
DoUnknownStopReason(FUnknownStopReason);
end
else
SetDebuggerState(dsPause);