From 28db71d05adccaa38c4ae7428d0bc6e81485ca47 Mon Sep 17 00:00:00 2001
From: svenbarth <svenbarth@3ad0048d-3df7-0310-abae-a5850022a9f2>
Date: Thu, 4 May 2017 21:55:12 +0000
Subject: * tarrayconstructornode: force conversion to set if there's a range
 node in the tree

git-svn-id: https://svn.freepascal.org/svn/fpc/trunk@36101 3ad0048d-3df7-0310-abae-a5850022a9f2
---
 compiler/nld.pas | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'compiler/nld.pas')

diff --git a/compiler/nld.pas b/compiler/nld.pas
index c2f4bc6876..23cff9440a 100644
--- a/compiler/nld.pas
+++ b/compiler/nld.pas
@@ -1031,7 +1031,7 @@ implementation
         Do this only if we didn't convert the arrayconstructor yet. This
         is needed for the cases where the resultdef is forced for a second
         run }
-        if not(allow_array_constructor) then
+        if not allow_array_constructor or has_range_node then
          begin
            hp:=tarrayconstructornode(getcopy);
            arrayconstructor_to_set(tnode(hp));
-- 
cgit v1.2.1