mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-05-01 20:30:28 +02:00
Code Activity

* null-threads.c: fix various preprocessor usages of new public

Browse source 
symbols to expect 0 or 1 values rather than 1 or undefined.
i.e. change #ifdef to #if, etc.
This commit is contained in:
Rob Browning 2003-03-27 20:09:13 +00:00
parent 2899af3ff7
commit b075613ec4
1 changed files with 1 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
libguile/null-threads.c
View file

@ -104,7 +104,7 @@ scm_threads_mark_stacks (void)
{ {
unsigned long stack_len = scm_stack_size (scm_stack_base); unsigned long stack_len = scm_stack_size (scm_stack_base);
#ifdef SCM_STACK_GROWS_UP #if SCM_STACK_GROWS_UP
scm_mark_locations (scm_stack_base, stack_len); scm_mark_locations (scm_stack_base, stack_len);
#else #else
scm_mark_locations (scm_stack_base - stack_len, stack_len); scm_mark_locations (scm_stack_base - stack_len, stack_len);