• 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
        • Zcash
        • ACL2-programming-language
        • Prime-fields
        • Json
        • Syntheto
        • File-io-light
        • Cryptography
        • Number-theory
        • Lists-light
        • Axe
        • Builtins
        • Solidity
          • Values
            • Integer-values
              • Integer-operations
              • Bit-size
              • Uint
                • Uintp
                • Uint-fix
                • Uint-equiv
                • Make-uint
                  • Change-uint
                  • Uint->value
                  • Uint->size
                • Int
              • Boolean-values
          • Helpers
          • Htclient
          • Typed-lists-light
          • Arithmetic-light
        • X86isa
        • Axe
        • Execloader
      • Math
      • Testing-utilities
    • Uint

    Make-uint

    Basic constructor macro for uint structures.

    Syntax
    (make-uint [:size <size>] 
               [:value <value>]) 
    

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

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

    Definition

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

    Macro: make-uint

    (defmacro make-uint (&rest args)
      (std::make-aggregate 'uint
                           args '((:size) (:value))
                           'make-uint
                           nil))

    Function: uint

    (defun uint (size value)
      (declare (xargs :guard (and (bit-size-p size) (natp value))))
      (declare (xargs :guard (unsigned-byte-p size value)))
      (let ((__function__ 'uint))
        (declare (ignorable __function__))
        (b* ((size (mbe :logic (bit-size-fix size)
                        :exec size))
             (value (mbe :logic (nfix value) :exec value)))
          (let ((value (mbe :logic (unsigned-byte-fix size value)
                            :exec value)))
            (cons :uint (list size value))))))