procyberian/emacs
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

* lisp/emacs-lisp/smie.el (smie-prec2->grammar): Fix corner case problem.

Browse source
This commit is contained in:
Stefan Monnier 2015-02-18 20:31:17 -05:00
parent 746d2923d6
commit 99db66a01f
2 changed files with 9 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

7
lisp/emacs-lisp/smie.el
View file

@ -612,8 +612,11 @@ PREC2 is a table as returned by `smie-precs->prec2' or
(cons (pcase (cdr x)
(`closer (cddr (assoc token table)))
(`opener (cdr (assoc token table))))))
(cl-assert (numberp (car cons)))
(setf (car cons) (list (car cons)))))
;; `cons' can be nil for openers/closers which only contain
;; "atomic" elements.
(when cons
(cl-assert (numberp (car cons)))
(setf (car cons) (list (car cons))))))
(let ((ca (gethash :smie-closer-alist prec2)))
(when ca (push (cons :smie-closer-alist ca) table)))
;; (smie-check-grammar table prec2 'step3)