diff options
author | Andy Wingo <wingo@pobox.com> | 2012-01-29 22:24:25 +0100 |
---|---|---|
committer | Andy Wingo <wingo@pobox.com> | 2012-01-29 22:30:21 +0100 |
commit | a39b116f0071629082b0dc09ea782e321ee313ca (patch) | |
tree | 504196a3b93f5b4b16caad6c543318096ffbbff2 /libguile/vm-engine.h | |
parent | 5e80f2cea30e18e58b9aaf4e95acf8ccfd1eb45f (diff) | |
download | guile-a39b116f0071629082b0dc09ea782e321ee313ca.tar.gz |
Revert "attempt to clear stale references on VM C stack"
This reverts commit 04b2d773548c57b6eadd1808a8d15cce47af9630.
Since it wasn't fixing the "lexical vars are collectable" test, it added
complexity with no benefit.
Diffstat (limited to 'libguile/vm-engine.h')
-rw-r--r-- | libguile/vm-engine.h | 9 |
1 files changed, 1 insertions, 8 deletions
diff --git a/libguile/vm-engine.h b/libguile/vm-engine.h index 52467c229..000397de2 100644 --- a/libguile/vm-engine.h +++ b/libguile/vm-engine.h @@ -1,4 +1,4 @@ -/* Copyright (C) 2001, 2009, 2010, 2011, 2012 Free Software Foundation, Inc. +/* Copyright (C) 2001, 2009, 2010, 2011 Free Software Foundation, Inc. * * This library is free software; you can redistribute it and/or * modify it under the terms of the GNU Lesser General Public License @@ -152,8 +152,6 @@ #define ASSERT_BOUND(x) #endif -#define DEAD(v) v = SCM_UNDEFINED - #if VM_CHECK_OBJECT #define SET_OBJECT_COUNT(n) object_count = n #else @@ -327,7 +325,6 @@ do \ CONS (l, x, l); \ } \ PUSH (l); \ - DEAD (l); \ } while (0) /* The opposite: push all of the elements in L onto the list. */ @@ -353,9 +350,7 @@ do { \ CONS (l, o, l); \ POP (o); \ } \ - DEAD (o); \ PUSH (l); \ - DEAD (l); \ } while (0) #define POP_CONS_MARK() \ @@ -368,9 +363,7 @@ do { \ CONS (l, o, l); \ POP (o); \ } \ - DEAD (o); \ PUSH (l); \ - DEAD (l); \ } while (0) |