From 8e5b45cf9daf43f573ff3a970cd0f3430622edd1 Mon Sep 17 00:00:00 2001
From: Martin Stjernholm <mast@lysator.liu.se>
Date: Tue, 27 Nov 2001 21:41:32 +0100
Subject: [PATCH] Added test case for scope pointer bug.

Rev: src/testsuite.in:1.472
---
 src/testsuite.in | 9 ++++++++-
 1 file changed, 8 insertions(+), 1 deletion(-)

diff --git a/src/testsuite.in b/src/testsuite.in
index 886bc055f5..71fc7d740f 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",
 	#"
-- 
GitLab