diff options
author | Marius Vollmer <mvo@zagadka.de> | 2004-07-08 15:41:48 +0000 |
---|---|---|
committer | Marius Vollmer <mvo@zagadka.de> | 2004-07-08 15:41:48 +0000 |
commit | 5a572ca13c2258defb9355122febf4f04276b97e (patch) | |
tree | d340767309574e2d1b4c7d0191d07f89758493f8 /libguile/numbers.h | |
parent | d19905925431ab12bbdcf5c26cd6478fad7755fb (diff) | |
download | guile-5a572ca13c2258defb9355122febf4f04276b97e.tar.gz |
* numbers.h (SCM_MAKINUM, SCM_I_MAKINUM): Renamed SCM_MAKINUM to
SCM_I_MAKINUM and changed all uses.
* deprecated.h, deprecated.c (SCM_MAKINUM): Newly deprecated.
Diffstat (limited to 'libguile/numbers.h')
-rw-r--r-- | libguile/numbers.h | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/libguile/numbers.h b/libguile/numbers.h index af1f9252a..47e8cfe42 100644 --- a/libguile/numbers.h +++ b/libguile/numbers.h @@ -68,7 +68,7 @@ #define SCM_INUMP(x) (2 & SCM_UNPACK (x)) #define SCM_NINUMP(x) (!SCM_INUMP (x)) -#define SCM_MAKINUM(x) \ +#define SCM_I_MAKINUM(x) \ (SCM_PACK ((((scm_t_signed_bits) (x)) << 2) + scm_tc2_int)) #define SCM_INUM(x) (SCM_SRS ((scm_t_signed_bits) SCM_UNPACK (x), 2)) @@ -79,7 +79,7 @@ /* A name for 0. */ -#define SCM_INUM0 (SCM_MAKINUM (0)) +#define SCM_INUM0 (SCM_I_MAKINUM (0)) /* SCM_MAXEXP is the maximum double precision exponent * SCM_FLTMAX is less than or scm_equal the largest single precision float |