summaryrefslogtreecommitdiff
path: root/libguile/num2integral.i.c
diff options
context:
space:
mode:
authorMichael Livshin <mlivshin@bigfoot.com>2001-05-28 12:36:41 +0000
committerMichael Livshin <mlivshin@bigfoot.com>2001-05-28 12:36:41 +0000
commitdd85ce4758260f712d0efc806df6643aca8e3b74 (patch)
treefad1618800dd61fb9ab43ffa9584a7fcb4a9b6bb /libguile/num2integral.i.c
parent1db81cb09afe3afec94903a4f83a5e947829a58e (diff)
downloadguile-dd85ce4758260f712d0efc806df6643aca8e3b74.tar.gz
* strop.c (s_scm_string_capitalize_x): fix docstring quoting.
* socket.c (s_scm_inet_pton): fix docstring quoting. (s_scm_inet_ntop): ditto. * num2integral.i.c (INTEGRAL2NUM): cast to fix a warning. * hashtab.c (scm_internal_hash_fold): fix argument position in SCM_ASSERT. * environments.c (s_scm_import_environment_set_imports_x): fix argument position in SCM_ASSERT. * debug.c (s_scm_make_gloc): fix SCM packing/unpacking. (s_scm_make_iloc): ditto.
Diffstat (limited to 'libguile/num2integral.i.c')
-rw-r--r--libguile/num2integral.i.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/libguile/num2integral.i.c b/libguile/num2integral.i.c
index 3e5d65389..a68fe5d87 100644
--- a/libguile/num2integral.i.c
+++ b/libguile/num2integral.i.c
@@ -92,7 +92,7 @@ INTEGRAL2NUM (ITYPE n)
SCM_POSFIXABLE (n)
#endif
)
- return SCM_MAKINUM (n);
+ return SCM_MAKINUM ((long) n);
#ifdef SCM_BIGDIG
return INTEGRAL2BIG (n);