florian před 21 roky
rodič
revize
2e581da5a6
1 změnil soubory, kde provedl 2 přidání a 3 odebrání
  1. 2 3
      tests/test/tobject1.pp

+ 2 - 3
tests/test/tobject1.pp

@@ -1,4 +1,3 @@
-{ %RESULT=210 }
 {$R+}
 
 program test_fail;
@@ -69,7 +68,7 @@ program test_fail;
     mem : sizeint;
   begin
      require_error(210);
-     
+
 	 mem:=0;
 	 DoMem(mem);
      new(pa1,init(false));
@@ -96,4 +95,4 @@ program test_fail;
      writeln('typeof(ta2) = ',ptrint(typeof(ta2)),' after unsuccessful init');
      Writeln('Trying to call ta2.test (should generate a Run Time Error)');
      ta2.test;
-  end.
+  end.