diff options
author | Marius Vollmer <mvo@zagadka.de> | 2004-10-19 15:59:56 +0000 |
---|---|---|
committer | Marius Vollmer <mvo@zagadka.de> | 2004-10-19 15:59:56 +0000 |
commit | 1713d319b714502df37078ed2a0bf5a3496b9ac4 (patch) | |
tree | 9a60bcac75afef17ab3eac608d45eec7a279a07a /libguile/conv-integer.i.c | |
parent | 3bdf7962a7cf5a73e2235d7af811ed310806e545 (diff) | |
download | guile-1713d319b714502df37078ed2a0bf5a3496b9ac4.tar.gz |
* numbers.c (scm_i_range_error): New.
* conv-integer.i.c, conv-uinteger.i.c: Use it instead of
scm_out_of_range.
Diffstat (limited to 'libguile/conv-integer.i.c')
-rw-r--r-- | libguile/conv-integer.i.c | 8 |
1 files changed, 5 insertions, 3 deletions
diff --git a/libguile/conv-integer.i.c b/libguile/conv-integer.i.c index 82b81012d..4cf887cb6 100644 --- a/libguile/conv-integer.i.c +++ b/libguile/conv-integer.i.c @@ -1,10 +1,10 @@ -/* This code in included by number.s.c to generate integer conversion +/* This code in included by numbers.c to generate integer conversion functions like scm_to_int and scm_from_int. It is only for signed types, see conv-uinteger.i.c for the unsigned variant. */ /* You need to define the following macros before including this - template. They are undefined at the end of this file to giove a + template. They are undefined at the end of this file to give a clean slate for the next inclusion. TYPE - the integral type to be converted @@ -91,7 +91,9 @@ SCM_TO_TYPE_PROTO (SCM val) else { out_of_range: - scm_out_of_range (NULL, val); + scm_i_range_error (val, + scm_from_signed_integer (TYPE_MIN), + scm_from_signed_integer (TYPE_MAX)); return 0; } } |