1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-15 10:30:25 -08:00

* lisp/cedet/semantic/wisent/wisent.el (wisent-automaton-p): Use obarrayp.

This commit is contained in:
Stefan Monnier 2017-03-30 10:44:35 -04:00
parent 080a425db5
commit 2c69236b3c

View file

@ -114,7 +114,7 @@ If OBJ is a symbol check its value."
(and (vectorp obj) (= 4 (length obj))
(vectorp (aref obj 0)) (vectorp (aref obj 1))
(= (length (aref obj 0)) (length (aref obj 1)))
(listp (aref obj 2)) (vectorp (aref obj 3))))
(listp (aref obj 2)) (obarrayp (aref obj 3))))
(defsubst wisent-region (&rest positions)
"Return the start/end positions of the region including POSITIONS.