diff --git a/src/testsuite.in b/src/testsuite.in
index 30cbc74d8adfd7388e40ff7b05efd1c2b70e029f..f690cbdc91751a6a54519152c4cee33f4b0f122a 100644
--- a/src/testsuite.in
+++ b/src/testsuite.in
@@ -1,4 +1,4 @@
-stest_true([["$Id: testsuite.in,v 1.106 1998/05/13 07:45:31 hubbe Exp $"]])
+stest_true([["$Id: testsuite.in,v 1.107 1998/05/16 08:22:37 hubbe Exp $"]])
 cond([[all_constants()->_verify_internals]],
 [[
   test_do(_verify_internals())
@@ -1264,11 +1264,16 @@ test_eq([[(float)1]],[[1.0]])
 test_eq([[(string)1]],[["1"]])
 test_equal([[(array)(["1":1])]],[[ ({ ({"1", 1}) }) ]])
 test_equal([[(array(int)) ({"1","4711",2.0,4})]],[[({1,4711,2,4})]])
+test_equal([[(array(array))({({})})]],[[({({})})]])
+test_equal([[(array(array(int))) ({({"1","4711",2.0,4})})]],[[({({1,4711,2,4})]})])
 
 test_equal([[(array)"foo"]],[[ values("foo") ]])
 test_equal([[(array)(<1,2,3>)]],[[ indices( (<1,2,3>) )]])
 test_equal([[sort(column((array)([1:2,3:4]),0))]],[[ sort(indices(([1:2,3:4])) )]])
 test_equal([[sort(column((array)([1:2,3:4]),1))]],[[ sort(values(([1:2,3:4])))]])
+test_true([[(array(array))([]) ]])
+test_true([[(array(array))([1:2]) ]])
+test_true([[(array(array))([1:2,3:4]) ]])
 test_true([[(array(array))([1:2,3:4,5:6]) ]])
 
 // testing @