* fixed i.e. when type casting array constructors

git-svn-id: trunk@3532 -
2025-04-20 04:59:26 +02:00 · 2006-05-14 20:13:56 +00:00 · 2006-05-14 20:13:56 +00:00 · 3c4207bbe0
commit 3c4207bbe0
parent 48802b0866
1 changed files with 1 additions and 0 deletions
--- a/compiler/ncnv.pas
+++ b/compiler/ncnv.pas
@ -1604,6 +1604,7 @@ implementation
                                (left.resulttype.def.deftype=formaldef) or
                                (
                                 not(is_open_array(left.resulttype.def)) and
+                                 not(is_array_constructor(left.resulttype.def)) and
                                 (left.resulttype.def.size=resulttype.def.size)
                                ) or
                                (