geekinney/tp
1
0
Fork 0
Code Issues Pull Requests Actions 2 Packages Projects Releases Wiki Activity

Fix func-arity check to handle variadic functions

Browse Source 
Handle the case where max arity is 'many' (unlimited) for
variadic functions, in addition to numeric max arity.

Co-authored-by: Kinneyzhang <38454496+Kinneyzhang@users.noreply.github.com>
This commit is contained in:
copilot-swe-agent[bot] 2025-12-15 15:31:17 +00:00
parent b2fb5e75c5
commit 9957bd89ef
1 changed files with 4 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
tp.el
View File

@ -1321,7 +1321,10 @@ Example:
(text (if (stringp obj) (text (if (stringp obj)
(substring obj start end) (substring obj start end)
(buffer-substring start end))) (buffer-substring start end)))
(new-text (if (>= (cdr arity) 2) (max-arity (cdr arity))
(can-accept-idx (or (eq max-arity 'many)
(and (numberp max-arity) (>= max-arity 2))))
(new-text (if can-accept-idx
(funcall function text idx) (funcall function text idx)
(funcall function text)))) (funcall function text))))
(setq idx (1+ idx)) (setq idx (1+ idx))