Variable: semantic--elisp-parse-table

semantic--elisp-parse-table is a variable defined in el.el.gz.

Value

((bovine-toplevel
  (semantic-list
   #[771
     "\300@!\211<\203@�\211@\30118�\211:\2052�\211@;\2052�\211A@9\2052�\211A@\2052�\302
8<\2052�\303
8<0\262
\202;�\266\304\203@�\237\207\211\211:\205\215�\211@\3051u�\211:\205o�\211@;\205o�\211A@9\205o�\211A@\205o�\302
8<\205o�\303
8<0\262
\202x�\266\304\203\213�\306
@\307
8\262
!\203\213�A\202F�\211?\262
\203\223�\207\310
D\"\207"
     [semantic-elisp-use-read (error) 2 3 nil (error) vectorp 4 append]
     9
     ("/nix/store/y8rifw71hjgsl2qjn1l0vrwq2c3593aw-emacs-30-2/share/emacs/30.2/lisp/cedet/semantic/bovine/el.elc"
      . 3796)])))

Documentation

Top level bovination table for elisp.

Source Code

;; Defined in /usr/src/emacs/lisp/cedet/semantic/bovine/el.el.gz
;;; Parser
;;
(defvar semantic--elisp-parse-table
  `((bovine-toplevel
     (semantic-list
      ,(lambda (vals start end)
         (let ((tag (semantic-elisp-use-read (car vals))))
	   (cond
	    ((and (listp tag) (semantic-tag-p (car tag)))
	     ;; We got a list of tags back.  This list is
	     ;; returned here in the correct order, but this
	     ;; list gets reversed later, putting the correctly ordered
	     ;; items into reverse order later.
	     (nreverse tag))
	    ((semantic--tag-expanded-p tag)
	     ;; At this point, if `semantic-elisp-use-read' returned an
	     ;; already expanded tag (from definitions parsed inside an
	     ;; eval and compile wrapper), just pass it!
	     tag)
	    (t
	     ;; We got the basics of a single tag.
	     (append tag (list start end))))))))
    )
  "Top level bovination table for elisp.")