summaryrefslogtreecommitdiff
path: root/libguile/procprop.c
diff options
context:
space:
mode:
Diffstat (limited to 'libguile/procprop.c')
-rw-r--r--libguile/procprop.c3
1 files changed, 0 insertions, 3 deletions
diff --git a/libguile/procprop.c b/libguile/procprop.c
index c452c28d7..7cfd2e64f 100644
--- a/libguile/procprop.c
+++ b/libguile/procprop.c
@@ -73,9 +73,6 @@ scm_i_procedure_arity (SCM proc, int *req, int *opt, int *rest)
*rest = SCM_GSUBR_REST (type);
return 1;
}
- case scm_tc7_pws:
- proc = SCM_PROCEDURE (proc);
- goto loop;
case scm_tcs_struct:
if (!SCM_STRUCT_APPLICABLE_P (proc))
return 0;