Function: semantic-format-tag-abbreviate-semantic-grammar-mode

semantic-format-tag-abbreviate-semantic-grammar-mode is a byte-compiled function defined in grammar.el.gz.

Signature

(semantic-format-tag-abbreviate-semantic-grammar-mode TAG &optional PARENT COLOR)

Documentation

Return a string abbreviation of TAG.

Optional PARENT is not used. Optional COLOR is used to flag if color is added to the text. Override semantic-format-tag-abbreviate in semantic-grammar-mode buffers.

Source Code

;; Defined in /usr/src/emacs/lisp/cedet/semantic/grammar.el.gz
(define-mode-local-override semantic-format-tag-abbreviate
  semantic-grammar-mode (tag &optional parent color)
  "Return a string abbreviation of TAG.
Optional PARENT is not used.
Optional COLOR is used to flag if color is added to the text."
  (let ((class (semantic-tag-class tag))
        (name (semantic-format-tag-name tag parent color)))
    (cond
     ((eq class 'nonterminal)
      (concat name ":"))
     ((eq class 'setting)
      "%settings%")
     ((memq class '(rule keyword))
      name)
     (t
      (concat "%" (symbol-name class) " " name)))))