Function: cl--block-throw--cmacro

cl--block-throw--cmacro is a function defined in cl-macs.el.gz.

Signature

(cl--block-throw--cmacro _CL-WHOLE-ARG CL-TAG CL-VALUE)

Source Code

;; Defined in /usr/src/emacs/lisp/emacs-lisp/cl-macs.el.gz
;; Could not find source code, showing raw function object.
#[(_cl-whole-arg cl-tag cl-value)
  ((cl-block cl--block-throw--cmacro
     (let
	 ((cl-found
	   (and (symbolp cl-tag) (assq cl-tag cl--active-block-names))))
       (if cl-found (setcdr cl-found t)))
     `(throw ,cl-tag ,cl-value)))
  (t)]