49 |
#include "libguile/__scm.h" |
#include "libguile/__scm.h" |
50 |
#include "libguile/print.h" |
#include "libguile/print.h" |
51 |
|
|
52 |
|
#if defined (HAVE_FLOATINGPOINT_H) |
53 |
|
#include <floatingpoint.h> |
54 |
|
#endif |
55 |
|
|
56 |
|
#if defined (HAVE_IEEEFP_H) |
57 |
|
#include <ieeefp.h> |
58 |
|
#endif |
59 |
|
|
60 |
|
#if defined (HAVE_NAN_H) |
61 |
|
#if defined (SCO) |
62 |
|
#define _IEEE 1 |
63 |
|
#endif |
64 |
|
#include <nan.h> |
65 |
|
#if defined (SCO) |
66 |
|
#undef _IEEE |
67 |
|
#endif |
68 |
|
#endif |
69 |
|
|
70 |
|
|
71 |
|
|
72 |
/* Immediate Numbers, also known as fixnums |
/* Immediate Numbers, also known as fixnums |
220 |
SCM_API SCM scm_exact_p (SCM x); |
SCM_API SCM scm_exact_p (SCM x); |
221 |
SCM_API SCM scm_odd_p (SCM n); |
SCM_API SCM scm_odd_p (SCM n); |
222 |
SCM_API SCM scm_even_p (SCM n); |
SCM_API SCM scm_even_p (SCM n); |
223 |
|
SCM_API SCM scm_inf_p (SCM n); |
224 |
|
SCM_API SCM scm_nan_p (SCM n); |
225 |
|
SCM_API SCM scm_inf (void); |
226 |
|
SCM_API SCM scm_nan (void); |
227 |
SCM_API SCM scm_abs (SCM x); |
SCM_API SCM scm_abs (SCM x); |
228 |
SCM_API SCM scm_quotient (SCM x, SCM y); |
SCM_API SCM scm_quotient (SCM x, SCM y); |
229 |
SCM_API SCM scm_remainder (SCM x, SCM y); |
SCM_API SCM scm_remainder (SCM x, SCM y); |