Sfoglia il codice sorgente

* tarrayconstructornode: force conversion to set if there's a range node in the tree

git-svn-id: trunk@36101 -
svenbarth 8 anni fa
parent
commit
8f4ef91efb
1 ha cambiato i file con 1 aggiunte e 1 eliminazioni
  1. 1 1
      compiler/nld.pas

+ 1 - 1
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));