Function: rx--expand-def-form

rx--expand-def-form is a byte-compiled function defined in rx.el.gz.

Signature

(rx--expand-def-form FORM)

Documentation

List FORM expanded (once) if a user-defined construct; otherwise nil.

Source Code

;; Defined in /usr/src/emacs/lisp/emacs-lisp/rx.el.gz
(defun rx--expand-def-form (form)
  "List FORM expanded (once) if a user-defined construct; otherwise nil."
  (let ((op (car form)))
    (and (symbolp op)
         (let ((def (rx--lookup-def op)))
           (and def
                (if (cdr def)
                    (rx--expand-template op (cdr form) (nth 0 def) (nth 1 def))
                  (error "Not an `rx' form definition: %s" op)))))))