		Search-engine friendly clone of the ACL2 documentation.

Dirdeclor-array-static1

Make-dirdeclor-array-static1

Basic constructor macro for dirdeclor-array-static1 structures.

Syntax

(make-dirdeclor-array-static1 [:declor <declor>] 
                              [:qualspecs <qualspecs>] 
                              [:size <size>])

This is the usual way to construct dirdeclor-array-static1 structures. It simply conses together a structure with the specified fields.

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

Definition

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

Macro: make-dirdeclor-array-static1

(defmacro make-dirdeclor-array-static1 (&rest args)
  (std::make-aggregate 'dirdeclor-array-static1
                       args '((:declor) (:qualspecs) (:size))
                       'make-dirdeclor-array-static1
                       nil))

Function: dirdeclor-array-static1

(defun dirdeclor-array-static1 (declor qualspecs size)
  (declare (xargs :guard (and (dirdeclorp declor)
                              (typequal/attribspec-listp qualspecs)
                              (exprp size))))
  (declare (xargs :guard t))
  (b*
    ((declor (mbe :logic (dirdeclor-fix declor)
                  :exec declor))
     (qualspecs (mbe :logic (typequal/attribspec-list-fix qualspecs)
                     :exec qualspecs))
     (size (mbe :logic (expr-fix size)
                :exec size)))
    (cons :array-static1 (cons declor (cons qualspecs size)))))