summaryrefslogtreecommitdiff
path: root/libguile/unif.c
diff options
context:
space:
mode:
authorMarius Vollmer <mvo@zagadka.de>2002-03-14 22:25:31 +0000
committerMarius Vollmer <mvo@zagadka.de>2002-03-14 22:25:31 +0000
commita08b0d00584a86ff8ada530cd0996e5f3ac2b4c5 (patch)
tree9e1f42979807c6961322f2805017aa56c4d9de13 /libguile/unif.c
parent3b3cc7811592f7945b8f95101d83302c58826b0f (diff)
downloadguile-a08b0d00584a86ff8ada530cd0996e5f3ac2b4c5.tar.gz
(singp): Use SCM_REALP instead of SCM_SLOPPY_REALP.
Diffstat (limited to 'libguile/unif.c')
-rw-r--r--libguile/unif.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/libguile/unif.c b/libguile/unif.c
index ce0cf2706..761fbc101 100644
--- a/libguile/unif.c
+++ b/libguile/unif.c
@@ -146,7 +146,7 @@ scm_uniform_element_size (SCM obj)
static int
singp (SCM obj)
{
- if (!SCM_SLOPPY_REALP (obj))
+ if (!SCM_REALP (obj))
return 0;
else
{