diff --git a/src/testsuite.in b/src/testsuite.in index d315badf13186921d5578c36b88668d47aa57117..af627daa0c899897ce99ce6ed27bc5aa14adef0d 100644 --- a/src/testsuite.in +++ b/src/testsuite.in @@ -1,4 +1,4 @@ -stest_true([["$Id: testsuite.in,v 1.134 1998/11/30 09:31:04 mast Exp $"]]) +stest_true([["$Id: testsuite.in,v 1.135 1998/12/01 15:23:29 mast Exp $"]]) cond([[all_constants()->_verify_internals]], [[ test_do(_verify_internals()) @@ -2288,6 +2288,10 @@ test_equal(Array.diff3(({"a","b"}),({"b","c"}),({"c","a"})), ({({({"a"}),({"b"}),({ }),({ })}), ({({ }),({"b"}),({"c"}),({ })}), ({({ }),({ }),({"c"}),({"a"})})})) +test_equal(Array.diff3(({"a","b"}),({"b"}),({"c","b"})), + ({({({"a"}),({"b"})}), + ({({ }),({"b"})}), + ({({"c"}),({"b"})})})) test_equal(Array.diff3(({"a","b","c","d"}),({"x","x","x","d"}),({"a","y","y","y"})), ({({({"a"}),({"b","c" }),({"d"})}), ({({ }),({"x","x","x"}),({"d"})}),