summaryrefslogtreecommitdiff
path: root/libguile/numbers.c
diff options
context:
space:
mode:
authorDirk Herrmann <dirk@dirk-herrmanns-seiten.de>2001-06-26 10:59:34 +0000
committerDirk Herrmann <dirk@dirk-herrmanns-seiten.de>2001-06-26 10:59:34 +0000
commit36284627919a6968174b5f17369349187a2b4b1b (patch)
tree216f50e019e44f18a0d96769c0db47775e26b6f0 /libguile/numbers.c
parentfbcd68abe9c55fdaa762246a84f3324f11f1b0f8 (diff)
downloadguile-36284627919a6968174b5f17369349187a2b4b1b.tar.gz
* Deprecated scm_makfromstr and added scm_mem2string as a replacement.
* Eliminated some potential gc problems. * Eliminated some signedness problems. * Minor changes.
Diffstat (limited to 'libguile/numbers.c')
-rw-r--r--libguile/numbers.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/libguile/numbers.c b/libguile/numbers.c
index b1e139d01..2c7ebf447 100644
--- a/libguile/numbers.c
+++ b/libguile/numbers.c
@@ -2188,12 +2188,12 @@ SCM_DEFINE (scm_number_to_string, "number->string", 1, 1, 0,
if (SCM_INUMP (n)) {
char num_buf [SCM_INTBUFLEN];
size_t length = scm_iint2str (SCM_INUM (n), base, num_buf);
- return scm_makfromstr (num_buf, length, 0);
+ return scm_mem2string (num_buf, length);
} else if (SCM_BIGP (n)) {
return big2str (n, (unsigned int) base);
} else if (SCM_INEXACTP (n)) {
char num_buf [FLOBUFLEN];
- return scm_makfromstr (num_buf, iflo2str (n, num_buf), 0);
+ return scm_mem2string (num_buf, iflo2str (n, num_buf));
} else {
SCM_WRONG_TYPE_ARG (1, n);
}