paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-12 13:17:18 +02:00
Code Issues Packages Projects Releases Wiki Activity

Jedi code format: avoid warning include file not found for {$I+} {$I-}

Browse Source
This commit is contained in:
DomingoGP 2024-04-16 19:41:06 +02:00
parent d2d921d2d6
commit a2cee5287b
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/jcf2/Parse/PreProcessor/PreProcessorParseTree.pas
View File

@ -423,7 +423,7 @@ var
begin begin
try try
lsTemp := TrimLeft(psValue); lsTemp := TrimLeft(psValue);
if lsTemp = '' then if (lsTemp = '') or (lsTemp[1]='+') or (lsTemp[1]='-') then // {$I+} {$I-}
Exit; Exit;
if lsTemp[1] = '%' then // %DATE% %var% if lsTemp[1] = '%' then // %DATE% %var%
Exit; Exit;