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

Jedi Code Format: Support assign := in enumerations. Issue #38174, patch from Domingo Galmés.

Browse Source 
git-svn-id: trunk@64178 -
This commit is contained in:
juha 2020-12-07 10:34:00 +00:00
parent 5e56724a20
commit 3f62b54817
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
components/jcf2/Parse/BuildParseTree.pas
View File

@ -5072,9 +5072,9 @@ end;
procedure TBuildParseTree.RecogniseIdentValue; procedure TBuildParseTree.RecogniseIdentValue;
begin begin
if fcTokenList.FirstSolidTokenType = ttEquals then if fcTokenList.FirstSolidTokenType in [ttEquals, ttAssign] then
begin begin
Recognise(ttEquals); Recognise(fcTokenList.FirstSolidTokenType);
RecogniseExpr(True); RecogniseExpr(True);
end; end;
end; end;