diff --git a/src/testsuite.in b/src/testsuite.in
index 886bc055f5812aa274b2a4688638657cceb72bc5..71fc7d740f5ab0ac338e67fe2fa6ba4508a47dc6 100644
--- a/src/testsuite.in
+++ b/src/testsuite.in
@@ -1,4 +1,4 @@
-test_true([["$Id: testsuite.in,v 1.471 2001/11/10 19:33:15 mast Exp $"]]);
+test_true([["$Id: testsuite.in,v 1.472 2001/11/27 20:41:32 mast Exp $"]]);
 
 cond([[all_constants()->_verify_internals]],
 [[
@@ -996,6 +996,13 @@ class Gnu
 
 ]])
 
+test_any([[
+  int var;
+  void x() {var++;};
+  lambda () {x();}();
+  return var;
+]], 1);
+
 test_any([[
  Stdio.write_file("testsuite_test.pmod",
 	#"