* fixed after implementation of Objective-C "related result type" convention

git-svn-id: trunk@42817 -

tests/test/tobjc34.pp

@@ -15,7 +15,7 @@ type
     class procedure testClassOverride; override;
   end;
 
-  tmyoverrideclass = class of NSObject;
+  tmyoverrideclass = class of MyOverride;
 
 var
   selfshouldbe: tmyoverrideclass;

tests/test/tobjc36.pp

@@ -57,7 +57,7 @@ begin
   b:=MyObject.alloc.init;
   b.extraproc(2);
   b.release;
-  c:=MyObject.alloc.init;
-  c.extraproc(2);
+  c:=MyObject2.alloc.init;
+  c.extraproc(3);
   c.release;
 end.

tests/test/tobjcl2.pp

@@ -43,7 +43,7 @@ function MyDerivedClass.callprotectedfun: byte;
 var
   a: MyLibObjCClass;
 begin
-  a:=NSObject(MyDerivedClass.alloc).init;
+  a:=MyDerivedClass.alloc.init;
   a.fa:=55;
   a.fb:=66;
   if a.publicfun<>55 then