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

* fixed compilation after introduction of strict class type checking

Browse Source 
for var/out parameters

git-svn-id: branches/objc@13597 -
This commit is contained in:
Jonas Maebe 2009-08-25 19:43:45 +00:00
parent 1a34492990
commit 8def2c2ac3
2 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
compiler/nobjc.pas
View File

@ -231,7 +231,7 @@ function tobjcmessagesendnode.pass_1: tnode;
msgsendname: string;
newparas,
para: tcallparanode;
block: tblocknode;
block: tnode;
statements: tstatementnode;
temp: ttempcreatenode;
objcsupertype: tdef;

2
compiler/objcutil.pas
View File

@ -67,7 +67,7 @@ implementation
function objcsuperclassnode(def: tobjectdef): tnode;
var
block: tblocknode;
block: tnode;
statements: tstatementnode;
para: tcallparanode;
begin