Function: semantic-analyze-princ-sequence

semantic-analyze-princ-sequence is a byte-compiled function defined in analyze.el.gz.

Signature

(semantic-analyze-princ-sequence SEQUENCE &optional PREFIX BUFF)

Documentation

Send the tag SEQUENCE to standard out.

Use PREFIX as a label. Use BUFF as a source of override methods.

Source Code

;; Defined in /usr/src/emacs/lisp/cedet/semantic/analyze.el.gz
(defun semantic-analyze-princ-sequence (sequence &optional prefix _buff)
  "Send the tag SEQUENCE to standard out.
Use PREFIX as a label.
Use BUFF as a source of override methods."
  ;; If there is no sequence, at least show the field as being empty.
  (unless sequence (princ prefix) (princ "<none>\n"))

  ;; Display the sequence column aligned.
  (while sequence
    (princ prefix)
    (cond
     ((semantic-tag-p (car sequence))
      (princ (funcall semantic-analyze-summary-function
		      (car sequence))))
     ((stringp (car sequence))
      (princ "\"")
      (princ (semantic--format-colorize-text (car sequence) 'variable))
      (princ "\""))
     (t
      (princ (format "'%S" (car sequence)))))
    (princ "\n")
    (setq sequence (cdr sequence))
    (setq prefix (make-string (length prefix) ? ))
    ))