From 93cc3964a523722819f908ada71983235d7cbd04 Mon Sep 17 00:00:00 2001
From: peter <peter@freepascal.org>
Date: Fri, 26 Nov 2004 22:05:39 +0000
Subject: [PATCH]   * needs error 210

---
 tests/test/tobject1.pp | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/tests/test/tobject1.pp b/tests/test/tobject1.pp
index 76a4adc3bd..b63b486c51 100644
--- a/tests/test/tobject1.pp
+++ b/tests/test/tobject1.pp
@@ -68,6 +68,8 @@ program test_fail;
   var
     mem : sizeint;
   begin
+     require_error(210);
+     
 	 mem:=0;
 	 DoMem(mem);
      new(pa1,init(false));