mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-05-23 21:10:29 +02:00
Code Activity

Define NO_PREPRO_MAGOC when including

Browse source 
num2integral.c.i for `long long' and `signed long long'.
This commit is contained in:
Marius Vollmer 2001-10-06 19:58:24 +00:00
parent 004c0902ff
commit dcb6a296dc
1 changed files with 2 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

2
libguile/numbers.c
View file

@ -4353,6 +4353,7 @@ scm_i_big2dbl (SCM b)
#define ITYPE long long #define ITYPE long long
#define MIN_VALUE LLONG_MIN #define MIN_VALUE LLONG_MIN
#define MAX_VALUE LLONG_MAX #define MAX_VALUE LLONG_MAX
#define NO_PREPRO_MAGIC
#include "libguile/num2integral.i.c" #include "libguile/num2integral.i.c"
#define NUM2INTEGRAL scm_num2ulong_long #define NUM2INTEGRAL scm_num2ulong_long
@ -4361,6 +4362,7 @@ scm_i_big2dbl (SCM b)
#define UNSIGNED #define UNSIGNED
#define ITYPE unsigned long long #define ITYPE unsigned long long
#define MAX_VALUE ULLONG_MAX #define MAX_VALUE ULLONG_MAX
#define NO_PREPRO_MAGIC
#include "libguile/num2integral.i.c" #include "libguile/num2integral.i.c"
#endif /* HAVE_LONG_LONGS */ #endif /* HAVE_LONG_LONGS */