Function: semantic-tag-abstract-p-default

semantic-tag-abstract-p-default is a byte-compiled function defined in tag-ls.el.gz.

Signature

(semantic-tag-abstract-p-default TAG &optional PARENT)

Documentation

Return non-nil if TAG is abstract as a child of PARENT default action.

See semantic-tag-abstract-p.

Source Code

;; Defined in /usr/src/emacs/lisp/cedet/semantic/tag-ls.el.gz
(defun semantic-tag-abstract-p-default (tag &optional _parent)
  "Return non-nil if TAG is abstract as a child of PARENT default action.
See `semantic-tag-abstract-p'."
  (let ((mods (semantic-tag-modifiers tag))
	(abs nil))
    (while (and (not abs) mods)
      (if (stringp (car mods))
	  (setq abs (member (car mods) '("abstract" "virtual"))))
      (setq mods (cdr mods)))
    abs))