diff --git a/src/testsuite.in b/src/testsuite.in index 57970fb63007fe2db108bd9a0fb6355cff3373cf..4c0c4993c434fa168591cdf5abe02e35f2b4d430 100644 --- a/src/testsuite.in +++ b/src/testsuite.in @@ -1,4 +1,4 @@ -stest_true([["$Id: testsuite.in,v 1.187 1999/08/17 01:08:29 mast Exp $"]]) +stest_true([["$Id: testsuite.in,v 1.188 1999/08/17 03:17:57 mast Exp $"]]) cond([[all_constants()->_verify_internals]], [[ test_do(_verify_internals()) @@ -603,13 +603,8 @@ test_any_equal(array a = ({([1:10]),([1:11,2:12]),([2:13])}); map(a,`[]=,1,1); r ({([1:1]),([1:1,2:12]),([1:1,2:13])})) test_any_equal(array a = ({(["a":10]),(["b":11]),([])}); map(a,`->=,"a",1); return a;, ({(["a":1]),(["a":1,"b":11]),(["a":1])})) -test_eval_error([[ - class A {int i = 10; int ii(){return i;}}; - class B {inherit A;}; - class C {inherit A; int i = 11;}; - array a = ({A(1),B(2),C(3)}); - a["i"] = 7; -]]) +test_eval_error(array a = ({(["i":1]),([])}); a["i"];) +test_eval_error(array a = ({(["i":1]),([])}); a["i"] = 7;) test_any([[ class A {int i = 10; int ii(){return i;}}; class B {inherit A;};