* fixed compilation after introduction of strict class type checking

    for var/out parameters

git-svn-id: branches/objc@13597 -

compiler/nobjc.pas

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

compiler/objcutil.pas

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