diff --git a/components/jcf2/Parse/BuildParseTree.pas b/components/jcf2/Parse/BuildParseTree.pas index 3958d6f1fe..c4383c27a9 100644 --- a/components/jcf2/Parse/BuildParseTree.pas +++ b/components/jcf2/Parse/BuildParseTree.pas @@ -2868,6 +2868,12 @@ begin begin Recognise(ttOpenSquareBracket); RecogniseExprList; + // partial array pass Test(A[2..5]); + if fcTokenList.FirstSolidTokenType=ttDoubleDot then + begin + Recognise(ttDoubleDot); + RecogniseExprList; + end; Recognise(ttCloseSquareBracket); end; ttOpenBracket: