summaryrefslogtreecommitdiff
path: root/libguile
diff options
context:
space:
mode:
authorDaniel Llorens <lloda@sarc.name>2022-09-30 12:02:12 +0200
committerDaniel Llorens <lloda@sarc.name>2022-09-30 12:02:12 +0200
commitc0004442b7691f59a0e37869ef288eb26382ad9e (patch)
tree79d634c0bc3095bbc142382b2711bd5420fe50ae /libguile
parent426ed4068afaf9d134a90f25b0f5c84f4fe7df77 (diff)
downloadguile-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.c4
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