diff --git a/src/testsuite.in b/src/testsuite.in
index 1f07c0322d390154fd892fb367b96de7b184ad9f..6352d4e19194e33bc39b0baaa012d8aeee168b81 100644
--- a/src/testsuite.in
+++ b/src/testsuite.in
@@ -1,4 +1,4 @@
-stest_true([["$Id: testsuite.in,v 1.109 1998/05/16 10:09:18 hubbe Exp $"]])
+stest_true([["$Id: testsuite.in,v 1.110 1998/05/16 10:58:01 hubbe Exp $"]])
 cond([[all_constants()->_verify_internals]],
 [[
   test_do(_verify_internals())
@@ -1266,6 +1266,8 @@ 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(array(array(int)))) ({ ({ ({"1","4711",2.0,4}) }) }) ]],[[ ({ ({ ({1,4711,2,4}) }) }) ]])
+test_equal([[ (array(array(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>) )]])