		Search-engine friendly clone of the ACL2 documentation.

Vl-stream

Make-vl-stream

Basic constructor macro for vl-stream structures.

Syntax

(make-vl-stream [:dir <dir>] 
                [:size <size>] 
                [:parts <parts>] 
                [:atts <atts>])

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

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

Definition

This is an ordinary make- macro introduced by defprod.

Macro: make-vl-stream

(defmacro make-vl-stream (&rest args)
  (std::make-aggregate 'vl-stream
                       args '((:dir) (:size) (:parts) (:atts))
                       'make-vl-stream
                       nil))

Function: vl-stream

(defun vl-stream (dir size parts atts)
 (declare (xargs :guard (and (vl-leftright-p dir)
                             (vl-slicesize-p size)
                             (vl-streamexprlist-p parts)
                             (vl-atts-p atts))))
 (declare (xargs :guard t))
 (let ((__function__ 'vl-stream))
  (declare (ignorable __function__))
  (b* ((dir (mbe :logic (vl-leftright-fix dir)
                 :exec dir))
       (size (mbe :logic (vl-slicesize-fix size)
                  :exec size))
       (parts (mbe :logic (vl-streamexprlist-fix parts)
                   :exec parts))
       (atts (mbe :logic (vl-atts-fix atts)
                  :exec atts)))
   (cons :vl-stream (std::prod-cons (std::prod-cons dir size)
                                    (std::prod-cons parts atts))))))