diff --git a/src/testsuite.in b/src/testsuite.in
index 26d3b1fdcf626fa64349ec80f3f72a3477254338..37eb1b06e63b3d04158942694539e7b21bb54359 100644
--- a/src/testsuite.in
+++ b/src/testsuite.in
@@ -1,4 +1,4 @@
-stest_true([["$Id: testsuite.in,v 1.158 1999/03/07 01:01:16 hubbe Exp $"]])
+stest_true([["$Id: testsuite.in,v 1.159 1999/03/15 01:29:35 grubba Exp $"]])
 cond([[all_constants()->_verify_internals]],
 [[
   test_do(_verify_internals())
@@ -209,6 +209,21 @@ test_any([[
   return C()->bar;
 ]], 12)
 
+test_any([[
+  class A { int a = 1; };
+  class B { int b = 2; };
+  class C {
+    inherit A;
+    inherit B;
+    int c = 4;
+  };
+  class D {
+    inherit C;
+  };
+  object d = D();
+  return d->a + d->b + d->c;
+]], 7)
+
 test_eq([[object_program(master())]],[[(program)"/master"]])
 test_compile([[object("master") m = master();]])
 test_any([[int x; x++; if(x) return x; return -1;]],1)