paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-04-18 09:29:35 +02:00
Code Issues Packages Projects Releases Wiki Activity

IDE: Fix the parser for All Compiler Options when using FPC 2.7.1. Issue #26903.

Browse Source 
git-svn-id: trunk@46765 -
This commit is contained in:
juha 2014-11-06 19:29:35 +00:00
parent 1ea6528b88
commit 02113e0100
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
ide/compiler.pp
View File

@ -1045,8 +1045,9 @@ begin
ThisLine := StringReplace(aLines[i],'-Agas-darwinAssemble','-Agas-darwin Assemble',[]);
ThisInd := CalcIndentation(ThisLine);
ThisLine := Trim(ThisLine);
if ThisInd = 0 then Continue; //Call if needed: ReadVersion(ThisLine);// Top header lines for compiler version etc.
if ThisInd < 2 then Continue; //Call if needed: ReadVersion(ThisLine);// Top header lines for compiler version etc.
if (ThisLine = '') or (ThisInd > 30)
or (ThisLine[1] = '@')
or (Pos('-? ', ThisLine) > 0)
or (Pos('-h ', ThisLine) > 0) then Continue;