Browse Source

* fixed test

florian 21 years ago
parent
commit
2e581da5a6
1 changed files with 2 additions and 3 deletions
  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.