paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-12-05 06:37:20 +01:00
Code Issues Packages Projects Releases Wiki Activity

GdbmiDebugger: tests

Browse Source 
git-svn-id: trunk@61141 -
This commit is contained in:
martin 2019-05-05 10:54:22 +00:00
parent 5f50baabd0
commit c1833857ed
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
components/lazdebuggergdbmi/test/testwatches.pas
View File

@ -1659,6 +1659,7 @@ begin
// MIXED symbol info types
FCurrentExpArray := @ExpectBreakFooArray;
if FDoStatIntArray then
Add('VarStatIntArray', wdfDefault, '10,[\s\r\n]+12,[\s\r\n]+14,[\s\r\n]+16,[\s\r\n]+18',
skSimple, 'TStatIntArray',
@ -1891,9 +1892,8 @@ begin
if not TestControlCanTest(ControlTestWatch) then exit;
FDoStatIntArray := TestControlCanTest(ControlTestWatchUnstable);
// GDB 7.0 with fpc 2.4.x has issues with "array of int"
FDoStatIntArray := FDoStatIntArray and
not ((pos('2.4.', CompilerInfo.Name) > 0) and (DebuggerInfo.Version = 70000));
// GDB 7.0 has issues with "array of int"
FDoStatIntArray := FDoStatIntArray and not (DebuggerInfo.Version = 70000);
ClearTestErrors;