		Search-engine friendly clone of the ACL2 documentation.

Fundef

Make-fundef

Basic constructor macro for fundef structures.

Syntax

(make-fundef [:tyspec <tyspec>] 
             [:declor <declor>] 
             [:body <body>])

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

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

Definition

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

Macro: make-fundef

(defmacro make-fundef (&rest args)
  (std::make-aggregate 'fundef
                       args '((:tyspec) (:declor) (:body))
                       'make-fundef
                       nil))

Function: fundef

(defun fundef (tyspec declor body)
  (declare (xargs :guard (and (tyspecseqp tyspec)
                              (fun-declorp declor)
                              (block-item-listp body))))
  (declare (xargs :guard t))
  (let ((__function__ 'fundef))
    (declare (ignorable __function__))
    (b* ((tyspec (mbe :logic (tyspecseq-fix tyspec)
                      :exec tyspec))
         (declor (mbe :logic (fun-declor-fix declor)
                      :exec declor))
         (body (mbe :logic (block-item-list-fix body)
                    :exec body)))
      (cons :fundef (list (cons 'tyspec tyspec)
                          (cons 'declor declor)
                          (cons 'body body))))))