		Search-engine friendly clone of the ACL2 documentation.

Address

Make-address

Basic constructor macro for address structures.

Syntax

(make-address [:name <name>])

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

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

Definition

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

Macro: make-address

(defmacro make-address (&rest args)
  (std::make-aggregate 'address
                       args '((:name))
                       'make-address
                       nil))

Function: address

(defun address (name)
 (declare (xargs :guard (stringp name)))
 (declare (xargs :guard (address-string-p name)))
 (let ((__function__ 'address))
  (declare (ignorable __function__))
  (b* ((name (mbe :logic (str-fix name) :exec name)))
   (let
    ((name
      (mbe
       :logic
       (if (address-string-p name)
           name
        "aleo1oooooooooooooooooooooooooooooooooooooooooooooooooooooooooo")
       :exec name)))
    (cons :address (list (cons 'name name)))))))