• Top
  • Documentation
  • Books
  • Recursion-and-induction
  • Boolean-reasoning
  • Projects
  • Debugging
  • Std
  • Proof-automation
  • Macro-libraries
  • ACL2
  • Interfacing-tools
  • Hardware-verification
    • Gl
    • Esim
    • Vl2014
    • Sv
    • Vwsim
    • Fgl
    • Vl
      • Syntax
      • Loader
      • Warnings
      • Getting-started
      • Utilities
      • Printer
      • Kit
      • Mlib
      • Transforms
        • Unparameterization
        • Elaborate
        • Addnames
        • Annotate
          • Increment-elim
          • Make-implicit-wires
          • Basic-bind-elim
          • Argresolve
          • Basicsanity
          • Portdecl-sign
          • Enum-names
            • Vl-enumname-range-declarations
            • Vl-interfacelist-add-enumname-declarations
            • Vl-packagelist-add-enumname-declarations
            • Vl-modulelist-add-enumname-declarations
            • Vl-classlist-add-enumname-declarations
            • Vl-enumitemlist-enumname-declarations
            • Vl-enumname-declarations
            • Vl-paramdecl-enumname-declarations
            • Vl-paramdecllist-enumname-declarations
            • Vl-vardecllist-enumname-declarations
            • Vl-typedeflist-enumname-declarations
            • Vl-vardecl-enumname-declarations
            • Vl-typedef-enumname-declarations
            • Vl-package-add-enumname-declarations
            • Vl-design-add-enumname-declarations
            • Vl-interface-add-enumname-declarations
            • Vl-class-add-enumname-declarations
            • Vl-module-add-enumname-declarations
            • Vl-datatype-map
          • Port-resolve
          • Udp-elim
          • Vl-annotate-design
          • Vl-annotate-module
        • Clean-warnings
        • Eliminitial
        • Custom-transform-hooks
        • Problem-modules
    • X86isa
    • Svl
    • Rtl
  • Software-verification
  • Testing-utilities
  • Math

• Enum-names

Vl-class-add-enumname-declarations

Signature

(vl-class-add-enumname-declarations x) → new-x

Arguments

x — Guard (vl-class-p x).

Returns

new-x — Type (vl-class-p new-x).

Definitions and Theorems

Function: vl-class-add-enumname-declarations

(defun vl-class-add-enumname-declarations (x)
 (declare (xargs :guard (vl-class-p x)))
 (let ((__function__ 'vl-class-add-enumname-declarations))
  (declare (ignorable __function__))
  (b*
   (((vl-class x) (vl-class-fix x))
    (seen nil)
    ((mv typedefs warnings1 decls1 seen)
     (vl-typedeflist-enumname-declarations x.typedefs seen))
    ((mv vardecls warnings2 decls2 seen)
     (vl-vardecllist-enumname-declarations x.vardecls seen))
    ((mv paramdecls warnings3 decls3 seen)
     (vl-paramdecllist-enumname-declarations x.paramdecls seen))
    (- (fast-alist-free seen))
    (decls
      (remove-duplicates-equal
           (append-without-guard decls1 decls2 (list-fix decls3)))))
   (change-vl-class
        x
        :typedefs typedefs
        :vardecls vardecls
        :paramdecls (append decls paramdecls)
        :warnings
        (append-without-guard warnings1
                              warnings2 warnings3 x.warnings)))))

Theorem: vl-class-p-of-vl-class-add-enumname-declarations

(defthm vl-class-p-of-vl-class-add-enumname-declarations
  (b* ((new-x (vl-class-add-enumname-declarations x)))
    (vl-class-p new-x))
  :rule-classes :rewrite)

Theorem: vl-class-add-enumname-declarations-of-vl-class-fix-x

(defthm vl-class-add-enumname-declarations-of-vl-class-fix-x
  (equal (vl-class-add-enumname-declarations (vl-class-fix x))
         (vl-class-add-enumname-declarations x)))

Theorem: vl-class-add-enumname-declarations-vl-class-equiv-congruence-on-x

(defthm
  vl-class-add-enumname-declarations-vl-class-equiv-congruence-on-x
  (implies (vl-class-equiv x x-equiv)
           (equal (vl-class-add-enumname-declarations x)
                  (vl-class-add-enumname-declarations x-equiv)))
  :rule-classes :congruence)