• Top
  • Documentation
  • Books
  • 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
          • Port-resolve
          • Udp-elim
          • Vl-annotate-design
          • Vl-annotate-module
        • Clean-warnings
        • Eliminitial
        • Custom-transform-hooks
        • Problem-modules
    • X86isa
    • Svl
    • Rtl
  • Software-verification
  • Math
  • Testing-utilities

• Annotate

Vl-annotate-design

Top level annotate transform.

Signature

(vl-annotate-design design config) → new-design

Arguments

design — Guard (vl-design-p design).

config — Guard (vl-simpconfig-p config).

Returns

new-design — Type (vl-design-p new-design).

Definitions and Theorems

Function: vl-annotate-design

(defun vl-annotate-design (design config)
 (declare (xargs :guard (and (vl-design-p design)
                             (vl-simpconfig-p config))))
 (let ((__function__ 'vl-annotate-design))
  (declare (ignorable __function__))
  (b*
   ((design (xf-cwtime (vl-design-resolve-ansi-portdecls design)))
    (design
      (xf-cwtime (vl-design-resolve-nonansi-interfaceports design)))
    (design
         (xf-cwtime (vl-design-add-enumname-declarations design)))
    (design (xf-cwtime (vl-design-make-implicit-wires design)))
    (design (xf-cwtime (vl-design-portdecl-sign design)))
    (design (xf-cwtime (vl-design-bindelim design)))
    (design (xf-cwtime (vl-design-udp-elim design)))
    (design (xf-cwtime (vl-design-basicsanity design)))
    (design (xf-cwtime (vl-design-increment-elim design)))
    (design (if (vl-simpconfig->defer-argresolve config)
                design
              (xf-cwtime (vl-design-argresolve design))))
    (design (xf-cwtime (vl-design-type-disambiguate design))))
   design)))

Theorem: vl-design-p-of-vl-annotate-design

(defthm vl-design-p-of-vl-annotate-design
  (b* ((new-design (vl-annotate-design design config)))
    (vl-design-p new-design))
  :rule-classes :rewrite)