Function: c-intersect-lists

c-intersect-lists is a byte-compiled function defined in cc-defs.el.gz.

Signature

(c-intersect-lists LIST ALIST)

Source Code

;; Defined in /usr/src/emacs/lisp/progmodes/cc-defs.el.gz
(defsubst c-intersect-lists (list alist)
  ;; return the element of ALIST that matches the first element found
  ;; in LIST.  Uses assq.
  (let (match)
    (while (and list
		(not (setq match (assq (car list) alist))))
      (setq list (cdr list)))
    match))