Browse Source

* expected code is 220

pierre 23 years ago
parent
commit
abebcaa63a
1 changed files with 13 additions and 13 deletions
  1. 13 13
      tests/test/tobject3.pp

+ 13 - 13
tests/test/tobject3.pp

@@ -1,4 +1,4 @@
-{%RESULT=219 }
+{%RESULT=220 }
 { %OPT= -CR }
 program test_object;
 
@@ -9,34 +9,34 @@ type
     constructor init;
     procedure mymethod; virtual;
   end;
-  
-  
-  
+
+
+
   pobj2 = ^tobj2;
   tobj2 = object
     constructor init;
     procedure mymethod; virtual;
   end;
-  
-  
+
+
   constructor tobj2.init;
    begin
    end;
-   
+
   procedure tobj2.mymethod;
    begin
    end;
-   
-   
+
+
   constructor tobj1.init;
    begin
    end;
-   
+
   procedure tobj1.mymethod;
    begin
    end;
-  
-  
+
+
 var
  _obj1 : pobj1;
  _obj2 : pobj2;
@@ -45,4 +45,4 @@ Begin
   _obj2:=new(pobj2,init);
   pobj1(_obj2)^.mymethod;
 end.
-    
+