Function: comp-ctxt-union-1-mem-no-range--cmacro

comp-ctxt-union-1-mem-no-range--cmacro is a function defined in comp.el.gz.

Signature

(comp-ctxt-union-1-mem-no-range--cmacro _CL-WHOLE-ARG CL-X)

Documentation

compiler-macro for comp-ctxt-union-1-mem-no-range.

Source Code

;; Defined in /usr/src/emacs/lisp/emacs-lisp/comp.el.gz
;; Could not find source code, showing raw function object.
#[(_cl-whole-arg cl-x)
  ((cl-block comp-ctxt-union-1-mem-no-range--cmacro
     (cl--defsubst-expand '(cl-x)
			  '(cl-block comp-ctxt-union-1-mem-no-range
			     (progn
			       (or (comp-ctxt-p cl-x)
				   (signal 'wrong-type-argument
					   (list 'comp-ctxt cl-x)))
			       (aref cl-x 6)))
			  nil nil nil cl-x)))
  (t) nil "compiler-macro for `comp-ctxt-union-1-mem-no-range'."]