• Top
    • Documentation
    • Books
    • Boolean-reasoning
    • Projects
    • Debugging
    • Std
    • Community
    • Proof-automation
    • Macro-libraries
    • ACL2
    • Interfacing-tools
    • Hardware-verification
      • Gl
      • Esim
      • Vl2014
      • Sv
      • Fgl
      • Vwsim
      • 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
              • Vl-modulelist-resolve-nonansi-interfaceports
              • Vl-interfacelist-resolve-nonansi-interfaceports
              • Vl-ansi-portdecl-resolve
              • Vl-interfacelist-resolve-ansi-portdecls
              • Vl-modulelist-resolve-ansi-portdecls
              • Vl-ansi-portdecl-to-regularport
              • Vl-ansi-portdecl-to-regularport-from-previous-regularport
              • Vl-resolve-ansi-portdecls
              • Vl-nettype-for-parsed-ansi-port
              • Vl-loaditems-remove-interfaceport-decls
                • Vl-vardecl-is-really-interfaceport
                • Vl-name-is-interface-or-type
                • Vl-interface/type-warn-about-unexpected-lookup
                • Vl-interface-resolve-nonansi-interfaceports
                • Vl-module-resolve-nonansi-interfaceports
                • Vl-interface-resolve-ansi-portdecls
                • Vl-ports-resolve-interfaces
                • Vl-module-resolve-ansi-portdecls
                • Vl-ansi-portdecl-consistency-check
                • Vl-design-resolve-nonansi-interfaceports
                • Vl-ansi-portdecl-to-interfaceport
                • Vl-ansi-portdecl-regularport-type
                • Vl-design-resolve-ansi-portdecls
              • Udp-elim
              • Vl-annotate-design
              • Vl-annotate-module
            • Clean-warnings
            • Eliminitial
            • Custom-transform-hooks
            • Problem-modules
        • X86isa
        • Svl
        • Rtl
      • Software-verification
      • Math
      • Testing-utilities
    • Port-resolve

    Vl-loaditems-remove-interfaceport-decls

    Signature
    (vl-loaditems-remove-interfaceport-decls x ss) 
      → 
    (mv warnings new-loaditems ifport-alist)
    Arguments
    x — Guard (vl-genelementlist-p x).
    ss — Guard (vl-scopestack-p ss).
    Returns
    warnings — Type (vl-warninglist-p warnings).
    new-loaditems — Type (vl-genelementlist-p new-loaditems).
    ifport-alist — Type (vl-interfaceport-alist-p ifport-alist).

    Definitions and Theorems

    Function: vl-loaditems-remove-interfaceport-decls

    (defun vl-loaditems-remove-interfaceport-decls (x ss)
      (declare (xargs :guard (and (vl-genelementlist-p x)
                                  (vl-scopestack-p ss))))
      (let ((__function__ 'vl-loaditems-remove-interfaceport-decls))
        (declare (ignorable __function__))
        (b* (((when (atom x)) (mv nil nil nil))
             (warnings nil)
             ((wmv warnings rest rest-ifports)
              (vl-loaditems-remove-interfaceport-decls (cdr x)
                                                       ss))
             (x1 (vl-genelement-fix (car x))))
          (vl-genelement-case
               x1 :vl-genbase
               (b* (((unless (eq (tag x1.item) :vl-vardecl))
                     (mv warnings (cons x1 rest)
                         rest-ifports))
                    ((wmv warnings ifport)
                     (vl-vardecl-is-really-interfaceport x1.item ss))
                    ((unless ifport)
                     (mv warnings (cons x1 rest)
                         rest-ifports)))
                 (mv warnings rest
                     (cons (cons (vl-vardecl->name x1.item) ifport)
                           rest-ifports)))
               :otherwise (mv warnings (cons x1 rest)
                              rest-ifports)))))

    Theorem: vl-warninglist-p-of-vl-loaditems-remove-interfaceport-decls.warnings

    (defthm
     vl-warninglist-p-of-vl-loaditems-remove-interfaceport-decls.warnings
     (b* (((mv ?warnings ?new-loaditems ?ifport-alist)
           (vl-loaditems-remove-interfaceport-decls x ss)))
       (vl-warninglist-p warnings))
     :rule-classes :rewrite)

    Theorem: vl-genelementlist-p-of-vl-loaditems-remove-interfaceport-decls.new-loaditems

    (defthm
     vl-genelementlist-p-of-vl-loaditems-remove-interfaceport-decls.new-loaditems
     (b* (((mv ?warnings ?new-loaditems ?ifport-alist)
           (vl-loaditems-remove-interfaceport-decls x ss)))
       (vl-genelementlist-p new-loaditems))
     :rule-classes :rewrite)

    Theorem: vl-interfaceport-alist-p-of-vl-loaditems-remove-interfaceport-decls.ifport-alist

    (defthm
     vl-interfaceport-alist-p-of-vl-loaditems-remove-interfaceport-decls.ifport-alist
     (b* (((mv ?warnings ?new-loaditems ?ifport-alist)
           (vl-loaditems-remove-interfaceport-decls x ss)))
       (vl-interfaceport-alist-p ifport-alist))
     :rule-classes :rewrite)

    Theorem: vl-loaditems-remove-interfaceport-decls-of-vl-genelementlist-fix-x

    (defthm
     vl-loaditems-remove-interfaceport-decls-of-vl-genelementlist-fix-x
     (equal
      (vl-loaditems-remove-interfaceport-decls (vl-genelementlist-fix x)
                                               ss)
      (vl-loaditems-remove-interfaceport-decls x ss)))

    Theorem: vl-loaditems-remove-interfaceport-decls-vl-genelementlist-equiv-congruence-on-x

    (defthm
     vl-loaditems-remove-interfaceport-decls-vl-genelementlist-equiv-congruence-on-x
     (implies
          (vl-genelementlist-equiv x x-equiv)
          (equal (vl-loaditems-remove-interfaceport-decls x ss)
                 (vl-loaditems-remove-interfaceport-decls x-equiv ss)))
     :rule-classes :congruence)

    Theorem: vl-loaditems-remove-interfaceport-decls-of-vl-scopestack-fix-ss

    (defthm
        vl-loaditems-remove-interfaceport-decls-of-vl-scopestack-fix-ss
     (equal
      (vl-loaditems-remove-interfaceport-decls x (vl-scopestack-fix ss))
      (vl-loaditems-remove-interfaceport-decls x ss)))

    Theorem: vl-loaditems-remove-interfaceport-decls-vl-scopestack-equiv-congruence-on-ss

    (defthm
     vl-loaditems-remove-interfaceport-decls-vl-scopestack-equiv-congruence-on-ss
     (implies
          (vl-scopestack-equiv ss ss-equiv)
          (equal (vl-loaditems-remove-interfaceport-decls x ss)
                 (vl-loaditems-remove-interfaceport-decls x ss-equiv)))
     :rule-classes :congruence)