mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-06-10 22:10:21 +02:00
Code Activity

(scm_threads_mark_stacks) [SCM_STACK_GROWS_UP]: Correction

Browse source 
to stack marking call, two parameters and no cast on t->base.
This commit is contained in:
Kevin Ryde 2004-05-19 00:04:16 +00:00
parent 6123c3bcac
commit 659998043d
1 changed files with 1 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

3
libguile/threads.c
View file

@ -973,8 +973,7 @@ scm_threads_mark_stacks (void)
((size_t) sizeof scm_save_regs_gc_mark
/ sizeof (SCM_STACKITEM)));
scm_mark_locations (((size_t) t->base,
(size_t) stack_len));
scm_mark_locations (t->base, (size_t) stack_len);
#else
stack_len = t->base - SCM_STACK_PTR (&t);