git-svn-id: trunk@13595 -
@@ -612,6 +612,10 @@ implementation
variantdef:
if iscvarargs then
CGMessagePos1(p.fileinfo,type_e_wrong_type_in_array_constructor,p.resultdef.typename);
+ { maybe warn in case it's not using "packrecords c"? }
+ recorddef:
+ if not iscvarargs then
+ CGMessagePos1(p.fileinfo,type_e_wrong_type_in_array_constructor,p.resultdef.typename);
pointerdef:
;
classrefdef: