Function: byte-to-native-top-level-form--cmacro

byte-to-native-top-level-form--cmacro is a function defined in bytecomp.el.gz.

Signature

(byte-to-native-top-level-form--cmacro _CL-WHOLE-ARG CL-X)

Documentation

compiler-macro for inlining byte-to-native-top-level-form.

Source Code

;; Defined in /usr/src/emacs/lisp/emacs-lisp/bytecomp.el.gz
;; Closure converted to defun by helpful.
(defun byte-to-native-top-level-form--cmacro
    (_cl-whole-arg cl-x)
  "compiler-macro for inlining `byte-to-native-top-level-form'."
  (cl-block byte-to-native-top-level-form--cmacro
    (cl--defsubst-expand
     '(cl-x)
     '(cl-block byte-to-native-top-level-form
	(progn
	  (or
	   (byte-to-native-top-level-p cl-x)
	   (signal 'wrong-type-argument
		   (list 'byte-to-native-top-level cl-x)))
	  (aref cl-x 1)))
     nil nil nil cl-x)))