[Guile-commits] 01/02: Fix bad arguments to range_error() in numbers.c

[Daniel Llorens]

lloda pushed a commit to branch main
in repository guile.

commit c0004442b7691f59a0e37869ef288eb26382ad9e
Author: Daniel Llorens <lloda@sarc.name>
AuthorDate: Fri Sep 30 12:02:12 2022 +0200

    Fix bad arguments to range_error() in numbers.c
    
    Fixes https://debbugs.gnu.org/cgi/bugreport.cgi?bug=58154. Ouch.
---
 libguile/numbers.c | 4 ++--
 1 file 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