diff options
author | Marius Vollmer <mvo@zagadka.de> | 2005-01-24 23:41:14 +0000 |
---|---|---|
committer | Marius Vollmer <mvo@zagadka.de> | 2005-01-24 23:41:14 +0000 |
commit | 76da80e7881947ebcdb647e5ce4be029fece29f2 (patch) | |
tree | 9a56249fecf0002eefc25c6a0bfeb53a2b277d7f /libguile/root.c | |
parent | a54a94b39707f47a1f30533bcf7664094d65d073 (diff) | |
download | guile-76da80e7881947ebcdb647e5ce4be029fece29f2.tar.gz |
Reverted changed from 2005/01/24 19:14:54, which was a commit to the
wrong branch. Sorry.
Diffstat (limited to 'libguile/root.c')
-rw-r--r-- | libguile/root.c | 6 |
1 files changed, 2 insertions, 4 deletions
diff --git a/libguile/root.c b/libguile/root.c index 09ec7c049..dfe0ae313 100644 --- a/libguile/root.c +++ b/libguile/root.c @@ -46,6 +46,7 @@ root_mark (SCM root) scm_gc_mark (s->rootcont); scm_gc_mark (s->dynwinds); scm_gc_mark (s->progargs); + scm_gc_mark (s->exitval); scm_gc_mark (s->cur_inp); scm_gc_mark (s->cur_outp); scm_gc_mark (s->cur_errp); @@ -90,6 +91,7 @@ scm_make_root (SCM parent) root_state->rootcont = root_state->dynwinds = root_state->progargs + = root_state->exitval = root_state->cur_inp = root_state->cur_outp = root_state->cur_errp @@ -344,10 +346,6 @@ scm_apply_with_dynamic_root (SCM proc, SCM a1, SCM args, SCM handler) -/* Initialized in scm_threads_prehistory. - */ -pthread_key_t scm_i_root_key; - void scm_init_root () { |