summaryrefslogtreecommitdiff
path: root/eval.c
diff options
context:
space:
mode:
Diffstat (limited to 'eval.c')
-rw-r--r--eval.c3
1 files changed, 2 insertions, 1 deletions
diff --git a/eval.c b/eval.c
index 0057624011..f886db1215 100644
--- a/eval.c
+++ b/eval.c
@@ -6165,7 +6165,8 @@ method_arity(method)
body = body->nd_head;
if (!body) return INT2FIX(0);
n = body->nd_cnt;
- if (body->nd_rest >= 0) n = -n-1;
+ if (body->nd_opt || body->nd_rest >= 0)
+ n = -n-1;
return INT2FIX(n);
}
}