1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-04-30 20:00:19 +02:00

Fix handling of parameter lists to elisp defun to allow nil.

Thanks to Vasilij Schneidermann.
This commit is contained in:
Mikael Djurfeldt 2021-04-01 20:56:22 +02:00
parent 498564e3e3
commit 01bfd18f3d
2 changed files with 5 additions and 2 deletions

View file

@ -259,6 +259,7 @@
(define (%match lst null optional rest symbol)
(pmatch lst
(() (null))
(nil (null))
((&optional . ,tail) (optional tail))
((&rest . ,tail) (rest tail))
((,arg . ,tail) (guard (symbol? arg)) (symbol arg tail))