		Search-engine friendly clone of the ACL2 documentation.

Group-literal-result-ok

Make-group-literal-result-ok

Basic constructor macro for group-literal-result-ok structures.

Syntax

(make-group-literal-result-ok [:get <get>])

This is the usual way to construct group-literal-result-ok structures. It simply conses together a structure with the specified fields.

This macro generates a new group-literal-result-ok structure from scratch. See also change-group-literal-result-ok, which can "change" an existing structure, instead.

Definition

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

Macro: make-group-literal-result-ok

(defmacro make-group-literal-result-ok (&rest args)
  (std::make-aggregate 'group-literal-result-ok
                       args '((:get))
                       'make-group-literal-result-ok
                       nil))

Function: group-literal-result-ok

(defun group-literal-result-ok (get)
  (declare (xargs :guard (group-literalp get)))
  (declare (xargs :guard t))
  (let ((__function__ 'group-literal-result-ok))
    (declare (ignorable __function__))
    (b* ((get (mbe :logic (group-literal-fix get)
                   :exec get)))
      get)))