• Top
    • Documentation
    • Books
    • Boolean-reasoning
    • Projects
    • Debugging
    • Std
    • Proof-automation
    • Macro-libraries
    • ACL2
    • Interfacing-tools
    • Hardware-verification
      • Gl
      • Esim
      • Vl2014
        • Warnings
        • Primitives
        • Use-set
        • Syntax
        • Getting-started
        • Utilities
        • Loader
        • Transforms
          • Expression-sizing
          • Occform
          • Oprewrite
          • Expand-functions
          • Delayredux
          • Unparameterization
          • Caseelim
          • Split
          • Selresolve
          • Weirdint-elim
          • Vl-delta
          • Replicate-insts
          • Rangeresolve
          • Propagate
          • Clean-selects
          • Clean-params
          • Blankargs
          • Inline-mods
          • Expr-simp
          • Trunc
          • Always-top
          • Gatesplit
          • Gate-elim
          • Expression-optimization
          • Elim-supplies
          • Wildelim
          • Drop-blankports
          • Clean-warnings
          • Addinstnames
          • Custom-transform-hooks
          • Annotate
            • Make-implicit-wires
            • Resolve-indexing
            • Origexprs
            • Argresolve
              • Vl-convert-namedargs
              • Vl-modulelist-argresolve
              • Vl-arguments-argresolve
              • Vl-gateinst-dirassign
              • Vl-check-blankargs
              • Vl-annotate-plainargs
              • Vl-modinst-argresolve
                • Vl-modinstlist-argresolve
                • Vl-gateinstlist-dirassign
                • Vl-module-argresolve
                • Vl-design-argresolve
              • Portdecl-sign
              • Designwires
              • Udp-elim
              • Vl-annotate-design
            • Latchcode
            • Elim-unused-vars
            • Problem-modules
          • Lint
          • Mlib
          • Server
          • Kit
          • Printer
          • Esim-vl
          • Well-formedness
        • Sv
        • Fgl
        • Vwsim
        • Vl
        • X86isa
        • Svl
        • Rtl
      • Software-verification
      • Math
      • Testing-utilities
    • Argresolve

    Vl-modinst-argresolve

    Resolve arguments in a vl-modinst-p.

    Signature
    (vl-modinst-argresolve x ss warnings) → (mv warnings new-x)
    Arguments
    x — Guard (vl-modinst-p x).
    ss — Guard (vl-scopestack-p ss).
    warnings — Guard (vl-warninglist-p warnings).
    Returns
    warnings — Type (vl-warninglist-p warnings).
    new-x — Type (vl-modinst-p new-x).

    Definitions and Theorems

    Function: vl-modinst-argresolve

    (defun vl-modinst-argresolve (x ss warnings)
     (declare (xargs :guard (and (vl-modinst-p x)
                                 (vl-scopestack-p ss)
                                 (vl-warninglist-p warnings))))
     (let ((__function__ 'vl-modinst-argresolve))
      (declare (ignorable __function__))
      (b* ((x (vl-modinst-fix x))
           ((vl-modinst x) x)
           (submod (vl-scopestack-find-definition x.modname ss))
           ((unless (and submod
                         (or (eq (tag submod) :vl-module)
                             (eq (tag submod) :vl-interface))))
            (mv (fatal :type :vl-bad-instance
                       :msg "~a0 refers to undefined module ~m1."
                       :args (list x x.modname))
                x))
           (submod.ports (if (eq (tag submod) :vl-module)
                             (vl-module->ports submod)
                           (vl-interface->ports submod)))
           ((mv warnings new-args)
            (vl-arguments-argresolve x.portargs
                                     ss submod.ports submod warnings x))
           (new-x (change-vl-modinst x
                                     :portargs new-args)))
        (mv (ok) new-x))))

    Theorem: vl-warninglist-p-of-vl-modinst-argresolve.warnings

    (defthm vl-warninglist-p-of-vl-modinst-argresolve.warnings
      (b* (((mv ?warnings ?new-x)
            (vl-modinst-argresolve x ss warnings)))
        (vl-warninglist-p warnings))
      :rule-classes :rewrite)

    Theorem: vl-modinst-p-of-vl-modinst-argresolve.new-x

    (defthm vl-modinst-p-of-vl-modinst-argresolve.new-x
      (b* (((mv ?warnings ?new-x)
            (vl-modinst-argresolve x ss warnings)))
        (vl-modinst-p new-x))
      :rule-classes :rewrite)

    Theorem: vl-modinst-argresolve-of-vl-modinst-fix-x

    (defthm vl-modinst-argresolve-of-vl-modinst-fix-x
      (equal (vl-modinst-argresolve (vl-modinst-fix x)
                                    ss warnings)
             (vl-modinst-argresolve x ss warnings)))

    Theorem: vl-modinst-argresolve-vl-modinst-equiv-congruence-on-x

    (defthm vl-modinst-argresolve-vl-modinst-equiv-congruence-on-x
      (implies (vl-modinst-equiv x x-equiv)
               (equal (vl-modinst-argresolve x ss warnings)
                      (vl-modinst-argresolve x-equiv ss warnings)))
      :rule-classes :congruence)

    Theorem: vl-modinst-argresolve-of-vl-scopestack-fix-ss

    (defthm vl-modinst-argresolve-of-vl-scopestack-fix-ss
      (equal (vl-modinst-argresolve x (vl-scopestack-fix ss)
                                    warnings)
             (vl-modinst-argresolve x ss warnings)))

    Theorem: vl-modinst-argresolve-vl-scopestack-equiv-congruence-on-ss

    (defthm vl-modinst-argresolve-vl-scopestack-equiv-congruence-on-ss
      (implies (vl-scopestack-equiv ss ss-equiv)
               (equal (vl-modinst-argresolve x ss warnings)
                      (vl-modinst-argresolve x ss-equiv warnings)))
      :rule-classes :congruence)

    Theorem: vl-modinst-argresolve-of-vl-warninglist-fix-warnings

    (defthm vl-modinst-argresolve-of-vl-warninglist-fix-warnings
      (equal (vl-modinst-argresolve x ss (vl-warninglist-fix warnings))
             (vl-modinst-argresolve x ss warnings)))

    Theorem: vl-modinst-argresolve-vl-warninglist-equiv-congruence-on-warnings

    (defthm
      vl-modinst-argresolve-vl-warninglist-equiv-congruence-on-warnings
      (implies (vl-warninglist-equiv warnings warnings-equiv)
               (equal (vl-modinst-argresolve x ss warnings)
                      (vl-modinst-argresolve x ss warnings-equiv)))
      :rule-classes :congruence)