From 870c0e9e3f59baec1e104d6510c46cc8fe77a6de Mon Sep 17 00:00:00 2001
From: Martin Stjernholm <mast@lysator.liu.se>
Date: Sun, 2 Jul 2000 04:24:47 +0200
Subject: [PATCH] More gc checks.

Rev: src/testsuite.in:1.309
---
 src/testsuite.in | 46 +++++++++++++++++++++++++++++++++++++++++++++-
 1 file changed, 45 insertions(+), 1 deletion(-)

diff --git a/src/testsuite.in b/src/testsuite.in
index cbe3587e66..a528a60363 100644
--- a/src/testsuite.in
+++ b/src/testsuite.in
@@ -1,4 +1,4 @@
-test_true([["$Id: testsuite.in,v 1.308 2000/06/29 00:11:04 hubbe Exp $"]]);
+test_true([["$Id: testsuite.in,v 1.309 2000/07/02 02:24:47 mast Exp $"]]);
 
 cond([[all_constants()->_verify_internals]],
 [[
@@ -2386,6 +2386,50 @@ ifefun(gc,
 		      live[1]->y = live[0], live[1]->x = live[2];
 		      live[2]->x = live[1];
 		    }}),
+      ({2, 0, 2, 0, lambda() {	// 64
+		      live[0]->x = live[1], live[0]->y = live_nested[1];
+		      live[1]->w[0] = live_nested[0];
+		      live_nested[0]->y = live[0];
+		    }}),
+      ({2, 0, 2, 0, lambda() {	// 65
+		      live[0]->y = live[1], live[0]->x = live_nested[1];
+		      live[1]->w[0] = live_nested[0];
+		      live_nested[0]->y = live[0];
+		    }}),
+      ({1, 1, 3, 0, lambda() {	// 66
+		      dead[0]->x = dead[0], dead[0]->a = live_nested[0];
+		      live_nested[0]->x = live[0], live_nested[0]->y = live_nested[2];
+		      live[0]->x = live_nested[1];
+		    }}),
+      ({1, 1, 3, 0, lambda() {	// 67
+		      dead[0]->x = dead[0], dead[0]->a = live_nested[0];
+		      live_nested[0]->y = live[0], live_nested[0]->x = live_nested[2];
+		      live[0]->x = live_nested[1];
+		    }}),
+      ({0, 1, 2, 2, lambda() {	// 68
+		      dead[0]->x = dead[0], dead[0]->a = live_nested[0];
+		      live_nested[0]->y = live_nested[1], live_nested[0]->x = dead_nested[0];
+		      live_nested[1]->x = dead_nested[1];
+		      dead_nested[0]->x = live_nested[1];
+		    }}),
+      ({0, 1, 2, 2, lambda() {	// 69
+		      dead[0]->x = dead[0], dead[0]->a = live_nested[0];
+		      live_nested[0]->x = live_nested[1], live_nested[0]->y = dead_nested[0];
+		      live_nested[1]->x = dead_nested[1];
+		      dead_nested[0]->x = live_nested[1];
+		    }}),
+      ({0, 1, 2, 2, lambda() {	// 70
+		      dead[0]->x = dead[0], dead[0]->a = live_nested[0];
+		      live_nested[0]->x = live_nested[1], live_nested[0]->y = dead_nested[1];
+		      live_nested[1]->x = dead_nested[0];
+		      dead_nested[0]->x = live_nested[0];
+		    }}),
+      ({0, 1, 2, 2, lambda() {	// 71
+		      dead[0]->x = dead[0], dead[0]->a = live_nested[0];
+		      live_nested[0]->y = live_nested[1], live_nested[0]->x = dead_nested[1];
+		      live_nested[1]->x = dead_nested[0];
+		      dead_nested[0]->x = live_nested[0];
+		    }}),
       //       ({3, 0, 0, 0, lambda() { // Not possible without weak refs directly in objects.
       // 		   live[0]->x = live[0], live[0]->v[0] = live[1];
       // 		   live[1]->x = live[1], live[1]->w[0] = live[2];
-- 
GitLab