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

* fixed check for objc-methods passed to selector()

Browse Source 
git-svn-id: trunk@12871 -
This commit is contained in:
Jonas Maebe 2009-03-09 08:40:55 +00:00
parent 6165536b5e
commit b1c32d899b
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
compiler/nobjc.pas
View File

@ -121,7 +121,7 @@ function tobjcselectornode.pass_typecheck: tnode;
loadn:
begin
if (left.resultdef.typ=procdef) and
(po_objc in tprocdef(procdef).procoptions) then
(po_objc in tprocdef(left.resultdef).procoptions) then
begin
{ ok }
end