diff --git a/components/codetools/pascalparsertool.pas b/components/codetools/pascalparsertool.pas index ba853a5866..e9fb5c7c64 100644 --- a/components/codetools/pascalparsertool.pas +++ b/components/codetools/pascalparsertool.pas @@ -3505,9 +3505,11 @@ begin ReadConstant(true,false,[]); CurNode.EndPos:=CurPos.StartPos; end; + EndChildNode; + if IsModifier then // support modifiers not separated with semicolons: "faVolumeId = $00000008 platform deprecated;" + continue; if not (CurPos.Flag in AllowedAtomsBehind) then SaveRaiseCharExpectedButAtomFound(';'); - EndChildNode; if CurPos.Flag<>cafSemicolon then break; ReadNextAtom;