		Search-engine friendly clone of the ACL2 documentation.

Expr-arrsub

Make-expr-arrsub

Basic constructor macro for expr-arrsub structures.

Syntax

(make-expr-arrsub [:arg1 <arg1>] 
                  [:arg2 <arg2>] 
                  [:info <info>])

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

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

Definition

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

Macro: make-expr-arrsub

(defmacro make-expr-arrsub (&rest args)
  (std::make-aggregate 'expr-arrsub
                       args '((:arg1) (:arg2) (:info))
                       'make-expr-arrsub
                       nil))

Function: expr-arrsub

(defun expr-arrsub (arg1 arg2 info)
  (declare (xargs :guard (and (exprp arg1)
                              (exprp arg2)
                              (acl2::any-p info))))
  (declare (xargs :guard t))
  (b* ((arg1 (mbe :logic (expr-fix arg1) :exec arg1))
       (arg2 (mbe :logic (expr-fix arg2) :exec arg2))
       (info (mbe :logic (identity info)
                  :exec info)))
    (cons :arrsub (cons arg1 (cons arg2 info)))))