• Top
    • Documentation
    • Books
    • Boolean-reasoning
    • Projects
    • Debugging
    • Std
    • Proof-automation
    • Macro-libraries
    • ACL2
    • Interfacing-tools
    • Hardware-verification
    • Software-verification
      • Kestrel-books
        • Crypto-hdwallet
        • Apt
        • Error-checking
        • Fty-extensions
        • Isar
        • Kestrel-utilities
        • Set
        • Soft
        • C
        • Bv
        • Imp-language
        • Event-macros
        • Java
        • Bitcoin
        • Ethereum
        • Yul
          • Transformations
          • Language
            • Abstract-syntax
            • Dynamic-semantics
              • Exec
              • Find-fun
              • Init-local
              • Write-vars-values
              • Add-vars-values
              • Add-funs
              • Eoutcome
              • Soutcome
              • Ensure-funscope-disjoint
              • Write-var-value
              • Restrict-vars
              • Add-var-value
              • Funinfo
                • Funinfo-fix
                • Funinfo-equiv
                • Make-funinfo
                  • Funinfop
                  • Funinfo->outputs
                  • Funinfo->inputs
                  • Change-funinfo
                  • Funinfo->body
                • Exec-top-block
                • Values
                • Cstate
                • Funinfo+funenv
                • Read-vars-values
                • Read-var-value
                • Funenv
                • Funscope-for-fundefs
                • Exec-path
                • Path-to-var
                • Funinfo+funenv-result
                • Exec-literal
                • Soutcome-result
                • Mode-set-result
                • Literal-evaluation
                • Funscope-result
                • Funinfo-result
                • Funenv-result
                • Eoutcome-result
                • Cstate-result
                • Paths-to-vars
                • Funinfo-for-fundef
                • Lstate
                • Funscope
                • Mode-set
                • Modes
              • Concrete-syntax
              • Static-soundness
              • Static-semantics
              • Errors
            • Yul-json
          • Zcash
          • ACL2-programming-language
          • Prime-fields
          • Json
          • Syntheto
          • File-io-light
          • Cryptography
          • Number-theory
          • Lists-light
          • Axe
          • Builtins
          • Solidity
          • Helpers
          • Htclient
          • Typed-lists-light
          • Arithmetic-light
        • X86isa
        • Axe
        • Execloader
      • Math
      • Testing-utilities
    • Funinfo

    Make-funinfo

    Basic constructor macro for funinfo structures.

    Syntax
    (make-funinfo [:inputs <inputs>] 
                  [:outputs <outputs>] 
                  [:body <body>]) 
    

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

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

    Definition

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

    Macro: make-funinfo

    (defmacro make-funinfo (&rest args)
      (std::make-aggregate 'funinfo
                           args '((:inputs) (:outputs) (:body))
                           'make-funinfo
                           nil))

    Function: funinfo

    (defun funinfo (inputs outputs body)
      (declare (xargs :guard (and (identifier-listp inputs)
                                  (identifier-listp outputs)
                                  (blockp body))))
      (declare (xargs :guard t))
      (let ((__function__ 'funinfo))
        (declare (ignorable __function__))
        (b* ((inputs (mbe :logic (identifier-list-fix inputs)
                          :exec inputs))
             (outputs (mbe :logic (identifier-list-fix outputs)
                           :exec outputs))
             (body (mbe :logic (block-fix body)
                        :exec body)))
          (cons :funinfo (list (cons 'inputs inputs)
                               (cons 'outputs outputs)
                               (cons 'body body))))))