paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-17 17:49:13 +02:00
Code Issues Packages Projects Releases Wiki Activity

* fixed i.e. when type casting array constructors

Browse Source 
git-svn-id: trunk@3532 -
This commit is contained in:
florian 2006-05-14 20:13:56 +00:00
parent 48802b0866
commit 3c4207bbe0
1 changed files with 1 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
compiler/ncnv.pas
View File

@ -1604,6 +1604,7 @@ implementation
(left.resulttype.def.deftype=formaldef) or (left.resulttype.def.deftype=formaldef) or
( (
not(is_open_array(left.resulttype.def)) and not(is_open_array(left.resulttype.def)) and
not(is_array_constructor(left.resulttype.def)) and
(left.resulttype.def.size=resulttype.def.size) (left.resulttype.def.size=resulttype.def.size)
) or ) or
( (