diff options
author | svenbarth <svenbarth@3ad0048d-3df7-0310-abae-a5850022a9f2> | 2017-05-04 21:55:12 +0000 |
---|---|---|
committer | svenbarth <svenbarth@3ad0048d-3df7-0310-abae-a5850022a9f2> | 2017-05-04 21:55:12 +0000 |
commit | 28db71d05adccaa38c4ae7428d0bc6e81485ca47 (patch) | |
tree | beda906614644a7c249862a40a6232e168b4d6a0 /compiler | |
parent | 934541f857776fc659d41d46caa65a89fe4c9efd (diff) | |
download | fpc-28db71d05adccaa38c4ae7428d0bc6e81485ca47.tar.gz |
* 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
Diffstat (limited to 'compiler')
-rw-r--r-- | compiler/nld.pas | 2 |
1 files changed, 1 insertions, 1 deletions
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)); |