summaryrefslogtreecommitdiff
path: root/libguile/root.c
diff options
context:
space:
mode:
authorGary Houston <ghouston@arglist.com>2001-09-15 21:56:52 +0000
committerGary Houston <ghouston@arglist.com>2001-09-15 21:56:52 +0000
commit6c1b7628703d7fac1751357153fd14e095535c2c (patch)
tree94afb9e29a5d6f8fd5ed054122e95408c79647d7 /libguile/root.c
parent455c0ac82b288f254b3da7a93ae275594e5def87 (diff)
downloadguile-6c1b7628703d7fac1751357153fd14e095535c2c.tar.gz
* root.h (scm_root_state): removed the continuation_stack and
continuation_stack_ptr members, which have no apparent purpose. (scm_continuation_stack, scm_continuation_stack_ptr): #defines removed. * root.c (root_mark), init.c (restart_stack, start_stack), gc (scm_igc): remove all references to contination_stack and continuation_stack_ptr, avoiding allocation of a vector and useless processing during gc.
Diffstat (limited to 'libguile/root.c')
-rw-r--r--libguile/root.c4
1 files changed, 0 insertions, 4 deletions
diff --git a/libguile/root.c b/libguile/root.c
index 26a914948..e55c393a1 100644
--- a/libguile/root.c
+++ b/libguile/root.c
@@ -73,8 +73,6 @@ root_mark (SCM root)
scm_gc_mark (s->rootcont);
scm_gc_mark (s->dynwinds);
- scm_gc_mark (s->continuation_stack);
- scm_gc_mark (s->continuation_stack_ptr);
scm_gc_mark (s->progargs);
scm_gc_mark (s->exitval);
scm_gc_mark (s->cur_inp);
@@ -122,8 +120,6 @@ scm_make_root (SCM parent)
/* Initialize everything right now, in case a GC happens early. */
root_state->rootcont
= root_state->dynwinds
- = root_state->continuation_stack
- = root_state->continuation_stack_ptr
= root_state->progargs
= root_state->exitval
= root_state->cur_inp