diff options
author | Thien-Thi Nguyen <ttn@gnuvola.org> | 2001-09-26 03:14:15 +0000 |
---|---|---|
committer | Thien-Thi Nguyen <ttn@gnuvola.org> | 2001-09-26 03:14:15 +0000 |
commit | f5dd4f54192b15235c446c7418cfc3efb243b2ab (patch) | |
tree | 335c746aa59d1dab9969fceaa9bc8490e4e7a02e /libguile/chars.h | |
parent | 523f81bad8b9eb5913e8ab811962f575139e76cf (diff) | |
download | guile-f5dd4f54192b15235c446c7418cfc3efb243b2ab.tar.gz |
(SCM_MAKE_CHAR): Use `scm_t_bits' instead of `intptr_t'.
Thanks to Golubev I. N.
Diffstat (limited to 'libguile/chars.h')
-rw-r--r-- | libguile/chars.h | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/libguile/chars.h b/libguile/chars.h index 1e92f6679..221a4039b 100644 --- a/libguile/chars.h +++ b/libguile/chars.h @@ -53,7 +53,7 @@ */ #define SCM_CHARP(x) (SCM_ITAG8(x) == scm_tc8_char) #define SCM_CHAR(x) ((unsigned int)SCM_ITAG8_DATA(x)) -#define SCM_MAKE_CHAR(x) SCM_MAKE_ITAG8((intptr_t) x, scm_tc8_char) +#define SCM_MAKE_CHAR(x) SCM_MAKE_ITAG8((scm_t_bits) x, scm_tc8_char) |