		Search-engine friendly clone of the ACL2 documentation.

Literal-dec-number

Make-literal-dec-number

Basic constructor macro for literal-dec-number structures.

Syntax

(make-literal-dec-number [:get <get>])

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

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

Definition

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

Macro: make-literal-dec-number

(defmacro make-literal-dec-number (&rest args)
  (std::make-aggregate 'literal-dec-number
                       args '((:get))
                       'make-literal-dec-number
                       nil))

Function: literal-dec-number

(defun literal-dec-number (get)
  (declare (xargs :guard (natp get)))
  (declare (xargs :guard t))
  (let ((__function__ 'literal-dec-number))
    (declare (ignorable __function__))
    (b* ((get (mbe :logic (nfix get) :exec get)))
      (cons :dec-number (list get)))))