Function: semantic-grammar-setup-menu-emacs

semantic-grammar-setup-menu-emacs is a byte-compiled function defined in grammar.el.gz.

Signature

(semantic-grammar-setup-menu-emacs SYMBOL MODE-MENU)

Documentation

Setup a GNU Emacs grammar menu in variable SYMBOL.

MODE-MENU is an optional specific menu whose items are appended to the common grammar menu.

Source Code

;; Defined in /usr/src/emacs/lisp/cedet/semantic/grammar.el.gz
(defun semantic-grammar-setup-menu-emacs (symbol mode-menu)
  "Setup a GNU Emacs grammar menu in variable SYMBOL.
MODE-MENU is an optional specific menu whose items are appended to the
common grammar menu."
  (let ((items (make-symbol "items")))
    `(unless (boundp ',symbol)
       (easy-menu-define ,symbol (current-local-map)
         "Grammar Menu" semantic-grammar-menu)
       (let ((,items (cdr ,mode-menu)))
         (when ,items
           (easy-menu-add-item ,symbol nil "--")
           (while ,items
             (easy-menu-add-item ,symbol nil (car ,items))
             (setq ,items (cdr ,items))))))
    ))