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

* numbers.h: Put #ifdef HAVE_LONG_LONGS around declarations using

Browse source 
the long_long type.  (Thanks to Bernard Urban.)
This commit is contained in:
Mikael Djurfeldt 2000-06-20 14:57:45 +00:00
parent f69a01b29c
commit 9ea8cdcb43
1 changed files with 5 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

6
libguile/numbers.h
View file

@ -228,7 +228,9 @@ extern SCM scm_adjbig (SCM b, scm_sizet nlen);
extern SCM scm_normbig (SCM b);
extern SCM scm_copybig (SCM b, int sign);
extern SCM scm_long2big (long n);
#ifdef HAVE_LONG_LONGS
extern SCM scm_long_long2big (long_long n);
#endif
extern SCM scm_2ulong2big (unsigned long * np);
extern SCM scm_ulong2big (unsigned long n);
extern int scm_bigcomp (SCM x, SCM y);
@ -289,11 +291,13 @@ extern SCM scm_trunc (SCM x);
extern SCM scm_dbl2big (double d);
extern double scm_big2dbl (SCM b);
extern SCM scm_long2num (long sl);
extern SCM scm_long_long2num (long_long sl);
extern SCM scm_ulong2num (unsigned long sl);
extern long scm_num2long (SCM num, char *pos, const char *s_caller);
#ifdef HAVE_LONG_LONGS
extern SCM scm_long_long2num (long_long sl);
extern long_long scm_num2long_long (SCM num, char *pos,
const char *s_caller);
#endif
extern unsigned long scm_num2ulong (SCM num, char *pos,
const char *s_caller);
extern void scm_init_numbers (void);