diff options
-rw-r--r-- | libguile/coop-pthreads.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/libguile/coop-pthreads.c b/libguile/coop-pthreads.c index c7210c95a..b1ba06064 100644 --- a/libguile/coop-pthreads.c +++ b/libguile/coop-pthreads.c @@ -895,7 +895,7 @@ scm_threads_mark_stacks (void) /* Active thread */ /* stack_len is long rather than sizet in order to guarantee that &stack_len is long aligned */ -#ifdef SCM_STACK_GROWS_UP +#if SCM_STACK_GROWS_UP long stack_len = ((SCM_STACKITEM *) (&t) - (SCM_STACKITEM *) thread->base); @@ -942,7 +942,7 @@ scm_threads_mark_stacks (void) else { /* Suspended thread */ -#ifdef SCM_STACK_GROWS_UP +#if SCM_STACK_GROWS_UP long stack_len = t->top - t->base; scm_mark_locations (t->base, stack_len); #else |