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

* gc-mark.c: #include <config.h> if HAVE_CONFIG_H. Rename usage

Browse source 
of HAVE_ARRAYS to SCM_HAVE_ARRAYS.  Replace usage of
HAVE_LONG_LONGS with "SCM_SIZEOF_LONG_LONG != 0".
This commit is contained in:
Rob Browning 2003-03-25 23:55:25 +00:00
parent 132fa21f55
commit 3ba436c800
1 changed files with 6 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

8
libguile/gc-mark.c
View file

@ -41,6 +41,10 @@
#if HAVE_CONFIG_H
# include <config.h>
#endif
#include <stdio.h> #include <stdio.h>
#include <errno.h> #include <errno.h>
#include <string.h> #include <string.h>
@ -286,7 +290,7 @@ scm_gc_mark_dependencies (SCM p)
goto gc_mark_loop; goto gc_mark_loop;
} }
#endif #endif
#ifdef HAVE_ARRAYS #ifdef SCM_HAVE_ARRAYS
case scm_tc7_bvect: case scm_tc7_bvect:
case scm_tc7_byvect: case scm_tc7_byvect:
case scm_tc7_ivect: case scm_tc7_ivect:
@ -295,7 +299,7 @@ scm_gc_mark_dependencies (SCM p)
case scm_tc7_dvect: case scm_tc7_dvect:
case scm_tc7_cvect: case scm_tc7_cvect:
case scm_tc7_svect: case scm_tc7_svect:
#ifdef HAVE_LONG_LONGS #if SCM_SIZEOF_LONG_LONG != 0
case scm_tc7_llvect: case scm_tc7_llvect:
#endif #endif
#endif #endif