		Search-engine friendly clone of the ACL2 documentation.

Vl-hidstep

Make-vl-hidstep

Basic constructor macro for vl-hidstep structures.

Syntax

(make-vl-hidstep [:name <name>] 
                 [:index <index>] 
                 [:item <item>] 
                 [:ss <ss>] 
                 [:elabpath <elabpath>])

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

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

Definition

This is an ordinary make- macro introduced by defprod.

Macro: make-vl-hidstep

(defmacro make-vl-hidstep (&rest args)
  (std::make-aggregate 'vl-hidstep
                       args
                       '((:name)
                         (:index)
                         (:item)
                         (:ss)
                         (:elabpath))
                       'make-vl-hidstep
                       nil))

Function: vl-hidstep

(defun vl-hidstep (name index item ss elabpath)
 (declare (xargs :guard (and (stringp name)
                             (vl-maybe-expr-p index)
                             (vl-scopeitem-p item)
                             (vl-scopestack-p ss)
                             (vl-elabtraversal-p elabpath))))
 (declare (xargs :guard t))
 (let ((__function__ 'vl-hidstep))
  (declare (ignorable __function__))
  (b* ((name (mbe :logic (str-fix name) :exec name))
       (index (mbe :logic (vl-maybe-expr-fix index)
                   :exec index))
       (item (mbe :logic (vl-scopeitem-fix item)
                  :exec item))
       (ss (mbe :logic (vl-scopestack-fix ss)
                :exec ss))
       (elabpath (mbe :logic (vl-elabtraversal-fix elabpath)
                      :exec elabpath)))
   (cons
        :vl-hidstep
        (std::prod-cons
             (std::prod-cons name index)
             (std::prod-cons item (std::prod-cons ss elabpath)))))))