		Search-engine friendly clone of the ACL2 documentation.

Expression-bind

Make-expression-bind

Basic constructor macro for expression-bind structures.

Syntax

(make-expression-bind [:variables <variables>] 
                      [:value <value>] 
                      [:body <body>])

This is the usual way to construct expression-bind structures. It simply conses together a structure with the specified fields.

This macro generates a new expression-bind structure from scratch. See also change-expression-bind, which can "change" an existing structure, instead.

Definition

This is an ordinary make- macro introduced by fty::defprod.

Macro: make-expression-bind

(defmacro make-expression-bind (&rest args)
  (std::make-aggregate 'expression-bind
                       args '((:variables) (:value) (:body))
                       'make-expression-bind
                       nil))

Function: expression-bind

(defun expression-bind (variables value body)
  (declare (xargs :guard (and (typed-variable-listp variables)
                              (expressionp value)
                              (expressionp body))))
  (declare (xargs :guard t))
  (let ((__function__ 'expression-bind))
    (declare (ignorable __function__))
    (b* ((variables (mbe :logic (typed-variable-list-fix variables)
                         :exec variables))
         (value (mbe :logic (expression-fix value)
                     :exec value))
         (body (mbe :logic (expression-fix body)
                    :exec body)))
      (cons :bind (list variables value body)))))