From f677f977270409121c3bc59dd92a8a8ed4dea49b Mon Sep 17 00:00:00 2001
From: juha <juha@lazarus-ide.org>
Date: Wed, 4 Nov 2020 19:26:52 +0000
Subject: [PATCH] =?UTF-8?q?Jedi=20Code=20Format:=20Support=20partial=20arr?=
 =?UTF-8?q?ay.=20Issue=20#38031,=20patch=20from=20Domingo=20Galm=C3=A9s.?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

git-svn-id: trunk@64105 -
---
 components/jcf2/Parse/BuildParseTree.pas | 6 ++++++
 1 file changed, 6 insertions(+)

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: