Function: majutsu-template--expand-elisp

majutsu-template--expand-elisp is a natively compiled function defined in majutsu-template.el.

Signature

(majutsu-template--expand-elisp FORM)

Documentation

Expand embedded Elisp expressions inside FORM when allowed.

Source Code

;; Defined in /nix/store/jagqw3nms546pad0gxi5f3wsckk6pji7-emacs-packages-deps/share/emacs/site-lisp/majutsu-template.el
(defun majutsu-template--expand-elisp (form)
  "Expand embedded Elisp expressions inside FORM when allowed."
  (cond
   ((majutsu-template-node-p form) form)
   ((vectorp form)
    (let ((items (mapcar #'majutsu-template--expand-elisp (append form nil))))
      (apply #'vector items)))
   ((and (consp form) (eq (car form) 'quote)) form)
   ((and (consp form) (keywordp (car form)))
    (cons (car form) (mapcar #'majutsu-template--expand-elisp (cdr form))))
   ((and (consp form) majutsu-template--allow-eval)
    (majutsu-template--expand-elisp (eval form)))
   ((consp form)
    (cons (majutsu-template--expand-elisp (car form))
          (mapcar #'majutsu-template--expand-elisp (cdr form))))
   (t form)))