diff options
author | Marius Vollmer <mvo@zagadka.de> | 2004-07-10 14:35:36 +0000 |
---|---|---|
committer | Marius Vollmer <mvo@zagadka.de> | 2004-07-10 14:35:36 +0000 |
commit | a55c2b680920198892329bdf78c92ecc7553eb58 (patch) | |
tree | 5dab8dec3f128c90a317b4a607d5d9382dfd8c85 /libguile/chars.c | |
parent | 7cee5b315a702049ba869150eb3d1658d38030d0 (diff) | |
download | guile-a55c2b680920198892329bdf78c92ecc7553eb58.tar.gz |
* validate.h, deprecated.h (SCM_VALIDATE_INUM, SCM_VALIDATE_INUM_COPY,
SCM_VALIDATE_BIGINT, SCM_VALIDATE_INUM_MIN,
SCM_VALIDATE_INUM_MIN_COPY,
SCM_VALIDATE_INUM_MIN_DEF_COPY,SCM_VALIDATE_INUM_DEF,
SCM_VALIDATE_INUM_DEF_COPY, SCM_VALIDATE_INUM_RANGE,
SCM_VALIDATE_INUM_RANGE_COPY): Deprecated because they make the
fixnum/bignum distinction visible. Changed all uses to scm_to_size_t
or similar.
Diffstat (limited to 'libguile/chars.c')
-rw-r--r-- | libguile/chars.c | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/libguile/chars.c b/libguile/chars.c index c4fdf9b03..ea44ccfdc 100644 --- a/libguile/chars.c +++ b/libguile/chars.c @@ -249,8 +249,7 @@ SCM_DEFINE (scm_integer_to_char, "integer->char", 1, 0, 0, "Return the character at position @var{n} in the ASCII sequence.") #define FUNC_NAME s_scm_integer_to_char { - SCM_VALIDATE_INUM_RANGE (1, n, 0, 256); - return SCM_MAKE_CHAR (SCM_INUM (n)); + return SCM_MAKE_CHAR (scm_to_uchar (n)); } #undef FUNC_NAME |