"Do nothing with TYPE."
nil)
-;; Old impl of the above. I'm not sure what the issue is
-; (let ((ans
-; (:override-with-args
-; ((semantic-analyze-find-tag (semantic-tag-name type)))
-; ;; Be default, we don't know.
-; nil))
-; (out nil))
-; (dolist (elt ans)
-; (cond
-; ((stringp elt)
-; (push (semantic-tag-new-variable
-; elt (semantic-tag-name type) nil)
-; out))
-; ((semantic-tag-p elt)
-; (push elt out))
-; (t nil)))
-; (nreverse out)))
-
(defun semantic-analyze-tags-of-class-list (tags classlist)
"Return the tags in TAGS that are of classes in CLASSLIST."
(let ((origc tags))