mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-12-03 00:17:18 +01:00
codetools: updated fpc error messages
git-svn-id: trunk@17112 -
This commit is contained in:
parent
44901be779
commit
119e8a249a
@ -2904,11 +2904,12 @@ var
|
||||
inc(CurPos);
|
||||
if CurPos > len then Exit;
|
||||
until line[CurPos] = ']';
|
||||
Inc(CurPos, 2); //skip space also
|
||||
Inc(CurPos, 2); // skip space too
|
||||
if len - CurPos < 6 then Exit; // shortest match
|
||||
end;
|
||||
|
||||
UpLine:=UpperCaseStr(Line);
|
||||
//DebugLn(['ProcessOutputLine ',Line]);
|
||||
|
||||
case UpLine[CurPos] of
|
||||
'M':
|
||||
|
||||
File diff suppressed because it is too large
Load Diff
Loading…
Reference in New Issue
Block a user