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

Merged revision(s) 48427 #9dffe82111 from trunk:

Browse Source 
Debugger GDBMI, prevent endless loop
........

git-svn-id: branches/fixes_1_4@48428 -
This commit is contained in:
martin 2015-03-20 00:34:10 +00:00
parent 7cff4e51bc
commit 0d716a18aa
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
components/lazdebuggergdbmi/gdbmidebugger.pp
View File

@ -10975,7 +10975,7 @@ begin
WStr := WStr + OneChar;
CurLocation := CurLocation + 2;
end;
until (OneChar = #0);
until (OneChar = #0) or (Length(WStr) > DebuggerProperties.MaxDisplayLengthForString);
Result := UTF16ToUTF8(WStr);
end;