• Top
  • Documentation
  • Books
  • Recursion-and-induction
  • Boolean-reasoning
  • Debugging
  • Projects
  • Std
  • Proof-automation
  • Macro-libraries
  • ACL2
  • Interfacing-tools
  • Hardware-verification
    • Gl
    • Esim
    • Vl2014
      • Warnings
      • Primitives
      • Use-set
        • Typo-detection
        • Vl-wireinfo-alistp
        • Vl-annotate-vardecllist-with-wireinfo
        • Vl-useset-report-entry-p
        • Vl-print-useset-report-entry
        • Vl-mark-wires-for-module
        • Vl-split-useset-report
        • Vl-annotate-vardecl-with-wireinfo
        • Vl-mark-wires-for-modinstlist
        • Vl-mark-wires-for-modinst
        • Vl-mark-wires-for-gateinstlist
        • Vl-mark-wires-for-gateinst
        • Vl-mark-wires-for-plainarg
        • Vl-wireinfo-p
        • Vl-mark-wires-for-modulelist
        • Vl-vardecllist-impexp-names
        • Vl-report-totals
        • Vl-mark-wires-for-plainarglist
        • Vl-collect-unused-or-unset-wires
        • Vl-clean-up-warning-wires
        • Vl-print-useset-report-top
        • Vl-mark-wires-for-arguments
        • Vl-useset-report-p
        • Vl-star-names-of-warning-wires
        • Vl-design-use-set-report
        • Vl-module-impexp-names
        • Vl-make-initial-wireinfo-alist
        • Vl-mark-wire-used
        • Vl-mark-wire-set
        • Vl-mark-wires-used
        • Vl-mark-wires-for-assignment
        • Vl-mark-wires-for-assignlist
        • Vl-mark-wires-set
        • Vl-print-useset-report-full-aux
        • Vl-print-typo-alist
        • Vl-print-typo-possibilities
      • Syntax
      • Getting-started
      • Utilities
      • Loader
      • Transforms
      • Lint
      • Mlib
      • Server
      • Kit
      • Printer
      • Esim-vl
      • Well-formedness
    • Sv
    • Vwsim
    • Fgl
    • Vl
    • X86isa
    • Svl
    • Rtl
  • Software-verification
  • Testing-utilities
  • Math

• Use-set

Vl-mark-wires-for-modinstlist

Signature

(vl-mark-wires-for-modinstlist x alist warnings) 
  → 
(mv new-alist new-warnings warning-wires)

Arguments

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

alist — Guard (vl-wireinfo-alistp alist).

warnings — Guard (vl-warninglist-p warnings).

Returns

new-alist — Type (vl-wireinfo-alistp new-alist), given (and (force (vl-modinstlist-p x)) (force (vl-wireinfo-alistp alist))) .

new-warnings — Type (vl-warninglist-p new-warnings).

warning-wires — Type (string-listp warning-wires), given (and (force (vl-modinstlist-p x)) (force (vl-wireinfo-alistp alist))) .

Definitions and Theorems

Function: vl-mark-wires-for-modinstlist

(defun vl-mark-wires-for-modinstlist (x alist warnings)
  (declare (xargs :guard (and (vl-modinstlist-p x)
                              (vl-wireinfo-alistp alist)
                              (vl-warninglist-p warnings))))
  (let ((__function__ 'vl-mark-wires-for-modinstlist))
    (declare (ignorable __function__))
    (b* (((when (atom x)) (mv alist (ok) nil))
         ((mv alist warnings warning-wires1)
          (vl-mark-wires-for-modinst (car x)
                                     alist warnings))
         ((mv alist warnings warning-wires2)
          (vl-mark-wires-for-modinstlist (cdr x)
                                         alist warnings)))
      (mv alist warnings
          (append warning-wires1 warning-wires2)))))

Theorem: vl-wireinfo-alistp-of-vl-mark-wires-for-modinstlist.new-alist

(defthm
      vl-wireinfo-alistp-of-vl-mark-wires-for-modinstlist.new-alist
  (implies (and (force (vl-modinstlist-p x))
                (force (vl-wireinfo-alistp alist)))
           (b* (((mv ?new-alist ?new-warnings ?warning-wires)
                 (vl-mark-wires-for-modinstlist x alist warnings)))
             (vl-wireinfo-alistp new-alist)))
  :rule-classes :rewrite)

Theorem: vl-warninglist-p-of-vl-mark-wires-for-modinstlist.new-warnings

(defthm
     vl-warninglist-p-of-vl-mark-wires-for-modinstlist.new-warnings
  (b* (((mv ?new-alist ?new-warnings ?warning-wires)
        (vl-mark-wires-for-modinstlist x alist warnings)))
    (vl-warninglist-p new-warnings))
  :rule-classes :rewrite)

Theorem: string-listp-of-vl-mark-wires-for-modinstlist.warning-wires

(defthm string-listp-of-vl-mark-wires-for-modinstlist.warning-wires
  (implies (and (force (vl-modinstlist-p x))
                (force (vl-wireinfo-alistp alist)))
           (b* (((mv ?new-alist ?new-warnings ?warning-wires)
                 (vl-mark-wires-for-modinstlist x alist warnings)))
             (string-listp warning-wires)))
  :rule-classes :rewrite)