(cond
((symbolp head)
(cond
- ((null head) nil) ; () is legal.
+ ((null head) nil) ; () is valid.
((eq head 'interactive-p)
;; Special case: replace (interactive-p) with variable
(setq edebug-def-interactive 'check-it)
;; doesn't handle (a . ,b). The straightforward fix:
;; (backquote-form . [&or nil backquote-form])
;; uses up too much stack space.
- ;; Note that `(foo . ,@bar) is not legal, so we don't need to handle it.
+ ;; Note that `(foo . ,@bar) is not valid, so we don't need to handle it.
(backquote-form [&rest [¬ ","] backquote-form]
. [&or nil backquote-form])
;; If you use dotted forms in backquotes, replace the previous line