diff options
author | Daniel Llorens <lloda@sarc.name> | 2022-09-30 12:02:12 +0200 |
---|---|---|
committer | Daniel Llorens <lloda@sarc.name> | 2022-09-30 12:02:12 +0200 |
commit | c0004442b7691f59a0e37869ef288eb26382ad9e (patch) | |
tree | 79d634c0bc3095bbc142382b2711bd5420fe50ae /libguile | |
parent | 426ed4068afaf9d134a90f25b0f5c84f4fe7df77 (diff) | |
download | guile-c0004442b7691f59a0e37869ef288eb26382ad9e.tar.gz |
Fix bad arguments to range_error() in numbers.c
Fixes https://debbugs.gnu.org/cgi/bugreport.cgi?bug=58154. Ouch.
Diffstat (limited to 'libguile')
-rw-r--r-- | libguile/numbers.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/libguile/numbers.c b/libguile/numbers.c index f5e89b9f0..30a826f13 100644 --- a/libguile/numbers.c +++ b/libguile/numbers.c @@ -6782,7 +6782,7 @@ scm_to_uint32 (SCM arg) } else scm_wrong_type_arg_msg (NULL, 0, arg, "exact integer"); - range_error (arg, 0, scm_integer_from_uint32 (UINT32_MAX)); + range_error (arg, scm_integer_from_uint32 (0), scm_integer_from_uint32 (UINT32_MAX)); #elif SCM_SIZEOF_LONG == 8 return inum_in_range (arg, 0, UINT32_MAX); #else @@ -6838,7 +6838,7 @@ scm_to_uint64 (SCM arg) } else scm_wrong_type_arg_msg (NULL, 0, arg, "exact integer"); - range_error (arg, 0, scm_integer_from_uint64 (UINT64_MAX)); + range_error (arg, scm_integer_from_uint64(0), scm_integer_from_uint64 (UINT64_MAX)); } SCM |