summaryrefslogtreecommitdiff
path: root/libguile/procprop.c
diff options
context:
space:
mode:
Diffstat (limited to 'libguile/procprop.c')
-rw-r--r--libguile/procprop.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/libguile/procprop.c b/libguile/procprop.c
index 9d9a131eb..f0ec8dd2e 100644
--- a/libguile/procprop.c
+++ b/libguile/procprop.c
@@ -98,7 +98,7 @@ scm_i_procedure_arity (SCM proc)
r = 1;
break;
case scm_tc7_smob:
- if (SCM_SMOB_DESCRIPTOR (proc).apply)
+ if (SCM_SMOB_APPLICABLE_P (proc))
{
int type = SCM_SMOB_DESCRIPTOR (proc).gsubr_type;
a += SCM_GSUBR_REQ (type);