diff options
Diffstat (limited to 'libguile/numbers.c')
-rw-r--r-- | libguile/numbers.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/libguile/numbers.c b/libguile/numbers.c index 08dc14e0b..588c4a0e5 100644 --- a/libguile/numbers.c +++ b/libguile/numbers.c @@ -2808,7 +2808,7 @@ SCM_DEFINE (scm_string_to_number, "string->number", 1, 1, 0, int base; SCM_VALIDATE_STRING (1, string); SCM_VALIDATE_INUM_MIN_DEF_COPY (2,radix,2,10,base); - answer = scm_istring2number (SCM_ROCHARS (string), + answer = scm_istring2number (SCM_STRING_CHARS (string), SCM_STRING_LENGTH (string), base); return scm_return_first (answer, string); |