Function: c-got-face-at

c-got-face-at is a byte-compiled function defined in cc-defs.el.gz.

Signature

(c-got-face-at POS FACES)

Documentation

Return non-nil if position POS in the current buffer has any of the faces in the list FACES.

Source Code

;; Defined in /usr/src/emacs/lisp/progmodes/cc-defs.el.gz
(defsubst c-got-face-at (pos faces)
  "Return non-nil if position POS in the current buffer has any of the
faces in the list FACES."
  (let ((pos-faces (get-text-property pos 'face)))
    (if (consp pos-faces)
	(progn
	  (while (and pos-faces
		      (not (memq (car pos-faces) faces)))
	    (setq pos-faces (cdr pos-faces)))
	  pos-faces)
      (memq pos-faces faces))))