paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-12-04 04:17:53 +01:00
Code Issues Packages Projects Releases Wiki Activity

* fixed crash when passing array constructor to formal parameter

Browse Source
This commit is contained in:
peter 2004-08-22 10:17:13 +00:00
parent 0a9f8702dd
commit 923569eee2
1 changed files with 6 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
compiler/ncal.pas
View File

@ -460,7 +460,8 @@ type
include(left.flags,nf_novariaallowed);
{ now that the resultting type is know we can insert the required
typeconvs for the array constructor }
tarrayconstructornode(left).force_type(tarraydef(paraitem.paratype.def).elementtype);
if paraitem.paratype.def.deftype=arraydef then
tarrayconstructornode(left).force_type(tarraydef(paraitem.paratype.def).elementtype);
end;
end;
@ -2392,7 +2393,10 @@ begin
end.
{
$Log$
Revision 1.244 2004-08-14 14:50:42 florian
Revision 1.245 2004-08-22 10:17:13 peter
* fixed crash when passing array constructor to formal parameter
Revision 1.244 2004/08/14 14:50:42 florian
* fixed several sparc alignment issues
+ Jonas' inline node patch; non functional yet