• Top
    • Documentation
    • Books
    • Boolean-reasoning
    • Projects
    • Debugging
    • Std
    • Community
    • 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
              • Vl-modulelist-make-implicit-wires
              • Vl-make-implicit-wires-aux
              • Shadowcheck
                • Vl-shadowcheck-reference-name
                • Vl-shadowcheck-aux
                • Vl-shadowcheck-reference-names
                • Vl-shadowcheck-declare-names
                • Vl-shadowcheck-declare-name
                • Vl-shadowcheck-fundecl
                • Vl-shadowcheck-declare-typedefs
                • Vl-shadowcheck-blockitemlist
                • Vl-shadowcheck-taskdecl
                • Vl-shadowcheck-portdecllist
                • Vl-shadowcheck-paramdecls
                • Vl-shadowcheck-taskdecls
                • Vl-shadowcheck-paramdecl
                • Vl-shadowcheck-gateinst
                • Vl-shadowcheck-vardecls
                • Vl-shadowcheck-vardecl
                • Vl-shadowcheck-portdecl
                • Vl-shadowcheck-modinst
                • Vl-shadowcheck-imports
                • Vl-shadowcheck-import
                • Vl-shadowcheck-fundecls
                • Vl-shadowcheck-blockitem
                • Vl-shadowcheck-ports
                • Vl-shadowcheck-port
                • Vl-shadowcheck-initial
                • Vl-shadowcheck-assign
                • Vl-shadowcheck-always
                • Vl-shadowcheck-alias
                • Vl-shadowcheck-state
                • Vl-shadowcheck-module
                • Vl-shadowcheck-modules
                • Vl-shadowcheck-push-scope
                • Vl-lexscopes
                  • Vl-lexscopes-fix
                  • Vl-lexscopes-direct-import-name
                  • Vl-lexscopes-wild-import-name
                  • Vl-lexscopes-wild-import-names
                  • Vl-lexscopes-declare-name
                  • Vl-lexscopes-do-import
                    • Vl-lexscopes-find
                    • Vl-lexscopes-equiv
                    • Vl-lexscopes-p
                    • Vl-lexscopes-exit-scope
                    • Vl-lexscopes-enter-new-scope
                  • Vl-shadowcheck-design
                  • Vl-shadowcheck-pop-scope
                  • Vl-lexscope
                • Vl-stmt-check-undeclared
                • Vl-make-implicit-wires-main
                • Vl-fundecl-check-undeclared
                • Vl-warn-about-undeclared-wires
                • Vl-implicitst
                • Vl-blockitem-check-undeclared
                • Vl-taskdecl-check-undeclared
                • Vl-modinst-exprs-for-implicit-wires
                • Vl-blockitemlist-check-undeclared
                • Vl-import-check-undeclared
                • Vl-make-ordinary-implicit-wires
                • Vl-gateinst-exprs-for-implicit-wires
                • Vl-remove-declared-wires
                • Vl-make-port-implicit-wires
                • Vl-module-make-implicit-wires
                • Vl-vardecl-exprs-for-implicit-wires
                • Vl-design-make-implicit-wires
              • Resolve-indexing
              • Origexprs
              • 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
    • Vl-lexscopes

    Vl-lexscopes-do-import

    Extend the lexscopes with a package import.

    Signature
    (vl-lexscopes-do-import x scopes warnings design) 
      → 
    (mv scopes warnings)
    Arguments
    x — Guard (vl-import-p x).
    scopes — Guard (vl-lexscopes-p scopes).
    warnings — Guard (vl-warninglist-p warnings).
    design — Guard (vl-design-p design).
    Returns
    scopes — Type (vl-lexscopes-p scopes).
    warnings — Type (vl-warninglist-p warnings).

    Definitions and Theorems

    Function: vl-lexscopes-do-import

    (defun vl-lexscopes-do-import (x scopes warnings design)
     (declare (xargs :guard (and (vl-import-p x)
                                 (vl-lexscopes-p scopes)
                                 (vl-warninglist-p warnings)
                                 (vl-design-p design))))
     (let ((__function__ 'vl-lexscopes-do-import))
      (declare (ignorable __function__))
      (b*
       (((vl-import x) (vl-import-fix x))
        (scopes (vl-lexscopes-fix scopes))
        (warnings (vl-warninglist-fix warnings))
        ((when (atom scopes))
         (raise "Expected at least one scope.")
         (mv scopes warnings))
        (pkg (vl-find-package x.pkg (vl-design->packages design)))
        (warnings
         (if pkg warnings
           (fatal
                :type :vl-bad-import
                :msg "~a0: trying to import from undefined package ~s1."
                :args (list x x.pkg))))
        (pkg-item-alist (and pkg
                             (vl-package-scope-item-alist-top pkg)))
        ((unless (eq x.part :vl-import*))
         (b*
          ((item (hons-get x.part pkg-item-alist))
           (warnings
              (if item warnings
                (fatal :type :vl-bad-import
                       :msg "~a0: no declaration of ~s1 in package ~s2."
                       :args (list x x.part x.pkg)))))
          (vl-lexscopes-direct-import-name
               x.pkg x.part scopes x warnings))))
       (vl-lexscopes-wild-import-names
            x.pkg
            pkg-item-alist scopes x warnings))))

    Theorem: vl-lexscopes-p-of-vl-lexscopes-do-import.scopes

    (defthm vl-lexscopes-p-of-vl-lexscopes-do-import.scopes
      (b* (((mv ?scopes ?warnings)
            (vl-lexscopes-do-import x scopes warnings design)))
        (vl-lexscopes-p scopes))
      :rule-classes :rewrite)

    Theorem: vl-warninglist-p-of-vl-lexscopes-do-import.warnings

    (defthm vl-warninglist-p-of-vl-lexscopes-do-import.warnings
      (b* (((mv ?scopes ?warnings)
            (vl-lexscopes-do-import x scopes warnings design)))
        (vl-warninglist-p warnings))
      :rule-classes :rewrite)

    Theorem: vl-lexscopes-do-import-of-vl-import-fix-x

    (defthm vl-lexscopes-do-import-of-vl-import-fix-x
      (equal (vl-lexscopes-do-import (vl-import-fix x)
                                     scopes warnings design)
             (vl-lexscopes-do-import x scopes warnings design)))

    Theorem: vl-lexscopes-do-import-vl-import-equiv-congruence-on-x

    (defthm vl-lexscopes-do-import-vl-import-equiv-congruence-on-x
     (implies
        (vl-import-equiv x x-equiv)
        (equal (vl-lexscopes-do-import x scopes warnings design)
               (vl-lexscopes-do-import x-equiv scopes warnings design)))
     :rule-classes :congruence)

    Theorem: vl-lexscopes-do-import-of-vl-lexscopes-fix-scopes

    (defthm vl-lexscopes-do-import-of-vl-lexscopes-fix-scopes
      (equal (vl-lexscopes-do-import x (vl-lexscopes-fix scopes)
                                     warnings design)
             (vl-lexscopes-do-import x scopes warnings design)))

    Theorem: vl-lexscopes-do-import-vl-lexscopes-equiv-congruence-on-scopes

    (defthm
         vl-lexscopes-do-import-vl-lexscopes-equiv-congruence-on-scopes
     (implies
        (vl-lexscopes-equiv scopes scopes-equiv)
        (equal (vl-lexscopes-do-import x scopes warnings design)
               (vl-lexscopes-do-import x scopes-equiv warnings design)))
     :rule-classes :congruence)

    Theorem: vl-lexscopes-do-import-of-vl-warninglist-fix-warnings

    (defthm vl-lexscopes-do-import-of-vl-warninglist-fix-warnings
     (equal
          (vl-lexscopes-do-import x scopes (vl-warninglist-fix warnings)
                                  design)
          (vl-lexscopes-do-import x scopes warnings design)))

    Theorem: vl-lexscopes-do-import-vl-warninglist-equiv-congruence-on-warnings

    (defthm
     vl-lexscopes-do-import-vl-warninglist-equiv-congruence-on-warnings
     (implies
        (vl-warninglist-equiv warnings warnings-equiv)
        (equal (vl-lexscopes-do-import x scopes warnings design)
               (vl-lexscopes-do-import x scopes warnings-equiv design)))
     :rule-classes :congruence)

    Theorem: vl-lexscopes-do-import-of-vl-design-fix-design

    (defthm vl-lexscopes-do-import-of-vl-design-fix-design
     (equal
         (vl-lexscopes-do-import x
                                 scopes warnings (vl-design-fix design))
         (vl-lexscopes-do-import x scopes warnings design)))

    Theorem: vl-lexscopes-do-import-vl-design-equiv-congruence-on-design

    (defthm vl-lexscopes-do-import-vl-design-equiv-congruence-on-design
     (implies
        (vl-design-equiv design design-equiv)
        (equal (vl-lexscopes-do-import x scopes warnings design)
               (vl-lexscopes-do-import x scopes warnings design-equiv)))
     :rule-classes :congruence)