Function: build-klist

build-klist is a byte-compiled function defined in cl-compat.el.gz.

Signature

(build-klist ARGLIST KEYS &optional ALLOW-OTHERS)

Source Code

;; Defined in /usr/src/emacs/lisp/obsolete/cl-compat.el.gz
;;; Routines for parsing keyword arguments.

(defun build-klist (arglist keys &optional allow-others)
  (let ((res (Multiple-value-call #'cl-mapcar 'cons (unzip-lists arglist))))
    (or allow-others
        (let ((bad (cl-set-difference (mapcar #'car res) keys)))
          (if bad (error "Bad keywords: %s not in %s" bad keys))))
    res))