mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-06-12 14:50:19 +02:00
Code Activity

(scm_threads_mark_stacks): Correction sizet -> size_t.

Browse source 
Reported by Andreas Vögele.
This commit is contained in:
Kevin Ryde 2004-04-28 00:15:54 +00:00
parent dfa6017ebe
commit dc30aad370
1 changed files with 2 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

4
libguile/threads.c
View file

@ -953,7 +953,7 @@ scm_threads_mark_stacks (void)
abort (); abort ();
#endif #endif
/* Active thread */ /* Active thread */
/* stack_len is long rather than sizet in order to guarantee /* stack_len is long rather than size_t in order to guarantee
that &stack_len is long aligned */ that &stack_len is long aligned */
#if SCM_STACK_GROWS_UP #if SCM_STACK_GROWS_UP
stack_len = SCM_STACK_PTR (&t) - t->base; stack_len = SCM_STACK_PTR (&t) - t->base;
@ -974,7 +974,7 @@ scm_threads_mark_stacks (void)
/ sizeof (SCM_STACKITEM))); / sizeof (SCM_STACKITEM)));
scm_mark_locations (((size_t) t->base, scm_mark_locations (((size_t) t->base,
(sizet) stack_len)); (size_t) stack_len));
#else #else
stack_len = t->base - SCM_STACK_PTR (&t); stack_len = t->base - SCM_STACK_PTR (&t);