		Search-engine friendly clone of the ACL2 documentation.

Vl-msg

Make-vl-msg

Basic constructor macro for vl-msg structures.

Syntax

(make-vl-msg [:msg <msg>] 
             [:args <args>])

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

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

Definition

This is an ordinary make- macro introduced by defprod.

Macro: make-vl-msg

(defmacro make-vl-msg (&rest args)
  (std::make-aggregate 'vl-msg
                       args '((:msg) (:args))
                       'make-vl-msg
                       nil))

Function: vl-msg

(defun vl-msg (msg args)
  (declare (xargs :guard (and (stringp msg) (true-listp args))))
  (declare (xargs :guard t))
  (let ((__function__ 'vl-msg))
    (declare (ignorable __function__))
    (b* ((msg (mbe :logic (str-fix msg) :exec msg))
         (args (mbe :logic (list-fix args)
                    :exec args)))
      (if args (cons msg args) msg))))