mirror of
https://git.savannah.gnu.org/git/guile.git
synced 2025-06-10 14:00:21 +02:00
* gc-mark.c: #include <config.h> if HAVE_CONFIG_H. Rename usage
of HAVE_ARRAYS to SCM_HAVE_ARRAYS. Replace usage of HAVE_LONG_LONGS with "SCM_SIZEOF_LONG_LONG != 0".
This commit is contained in:
parent
132fa21f55
commit
3ba436c800
1 changed files with 6 additions and 2 deletions
|
@ -41,6 +41,10 @@
|
|||
|
||||
|
||||
|
||||
#if HAVE_CONFIG_H
|
||||
# include <config.h>
|
||||
#endif
|
||||
|
||||
#include <stdio.h>
|
||||
#include <errno.h>
|
||||
#include <string.h>
|
||||
|
@ -286,7 +290,7 @@ scm_gc_mark_dependencies (SCM p)
|
|||
goto gc_mark_loop;
|
||||
}
|
||||
#endif
|
||||
#ifdef HAVE_ARRAYS
|
||||
#ifdef SCM_HAVE_ARRAYS
|
||||
case scm_tc7_bvect:
|
||||
case scm_tc7_byvect:
|
||||
case scm_tc7_ivect:
|
||||
|
@ -295,7 +299,7 @@ scm_gc_mark_dependencies (SCM p)
|
|||
case scm_tc7_dvect:
|
||||
case scm_tc7_cvect:
|
||||
case scm_tc7_svect:
|
||||
#ifdef HAVE_LONG_LONGS
|
||||
#if SCM_SIZEOF_LONG_LONG != 0
|
||||
case scm_tc7_llvect:
|
||||
#endif
|
||||
#endif
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue