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

* allow Objective-C classes/protocols in C varargs parameter lists

Browse Source 
git-svn-id: branches/objc@13460 -
This commit is contained in:
Jonas Maebe 2009-07-26 16:00:33 +00:00
parent 10aa7f40cd
commit a25e791ff8
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
compiler/ncnv.pas
View File

@ -613,7 +613,8 @@ implementation
if iscvarargs then if iscvarargs then
p:=ctypeconvnode.create(p,voidpointertype); p:=ctypeconvnode.create(p,voidpointertype);
objectdef : objectdef :
if iscvarargs or if (iscvarargs and
not is_objc_class_or_protocol(p.resultdef)) or
is_object(p.resultdef) then is_object(p.resultdef) then
CGMessagePos1(p.fileinfo,type_e_wrong_type_in_array_constructor,p.resultdef.typename); CGMessagePos1(p.fileinfo,type_e_wrong_type_in_array_constructor,p.resultdef.typename);
else else