Explorar o código

* expected code is 220

pierre %!s(int64=23) %!d(string=hai) anos
pai
achega
abebcaa63a
Modificáronse 1 ficheiros con 13 adicións e 13 borrados
  1. 13 13
      tests/test/tobject3.pp

+ 13 - 13
tests/test/tobject3.pp

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