• Top
  • Documentation
  • Books
  • Boolean-reasoning
  • Projects
  • Debugging
  • Community
  • Std
  • Proof-automation
  • Macro-libraries
  • ACL2
  • Interfacing-tools
  • Hardware-verification
    • Gl
    • Esim
    • Vl2014
      • Warnings
      • Primitives
      • Use-set
      • Syntax
      • Getting-started
      • Utilities
      • Loader
      • Transforms
      • Lint
      • Mlib
        • Scopestack
        • Filtering-by-name
        • Vl-namefactory
        • Substitution
        • Allexprs
        • Hid-tools
        • Vl-consteval
        • Range-tools
        • Lvalexprs
          • Vl-plainarglist-lvalexprs
          • Vl-gateinstlist-lvalexprs
          • Vl-modulelist-lvalexprs
          • Vl-modinstlist-lvalexprs
          • Vl-initiallist-lvalexprs
          • Vl-assignlist-lvalexprs
          • Vl-alwayslist-lvalexprs
          • Vl-plainarg-lvalexprs
            • Vl-plainarg-lvalexprs-nrev
          • Vl-module-lvalexprs
          • Vl-modinst-lvalexprs
          • Vl-initial-lvalexprs
          • Vl-gateinst-lvalexprs
          • Vl-assign-lvalexprs
          • Vl-always-lvalexprs
          • Vl-stmt-lvalexprs
        • Hierarchy
        • Finding-by-name
        • Expr-tools
        • Expr-slicing
        • Stripping-functions
        • Stmt-tools
        • Modnamespace
        • Vl-parse-expr-from-str
        • Welltyped
        • Reordering-by-name
        • Flat-warnings
        • Genblob
        • Expr-building
        • Datatype-tools
        • Syscalls
        • Relocate
        • Expr-cleaning
        • Namemangle
        • Caremask
        • Port-tools
        • Lvalues
      • Server
      • Kit
      • Printer
      • Esim-vl
      • Well-formedness
    • Sv
    • Fgl
    • Vwsim
    • Vl
    • X86isa
    • Svl
    • Rtl
  • Software-verification
  • Math
  • Testing-utilities

• Vl-plainarg-lvalexprs

Vl-plainarg-lvalexprs-nrev

Signature

(vl-plainarg-lvalexprs-nrev x nrev) → nrev

Arguments

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

Definitions and Theorems

Function: vl-plainarg-lvalexprs-nrev$inline

(defun vl-plainarg-lvalexprs-nrev$inline (x nrev)
 (declare (xargs :stobjs (nrev)))
 (declare (xargs :guard (vl-plainarg-p x)))
 (let ((__function__ 'vl-plainarg-lvalexprs-nrev))
  (declare (ignorable __function__))
  (b* ((x (vl-plainarg-fix x)))
   (b* (((vl-plainarg x) x))
    (cond
     ((not x.expr) (nrev-fix nrev))
     ((not x.dir)
      (prog2$
       (cw
        "; vl-plainarg-lvalexprs: note skipping unresolved argument~%")
       (nrev-fix nrev)))
     ((or (eq x.dir :vl-output)
          (eq x.dir :vl-inout))
      (cond
       ((assoc-equal "VL_UNSET_OUTPUT" x.atts)
        (nrev-fix nrev))
       ((vl-expr-lvaluep x.expr)
        (nrev-push x.expr nrev))
       (t
        (prog2$
         (cw
          "; vl-plainarg-lvalexprs note: skipping ill-formed output/inout~%")
         (nrev-fix nrev)))))
     ((assoc-equal "VL_LVALUE_INPUT" x.atts)
      (if (vl-expr-lvaluep x.expr)
          (nrev-push x.expr nrev)
       (prog2$
        (cw
         "; vl-plainarg-lvalexprs note: skipping non-lvalue backflow input~%")
        (nrev-fix nrev))))
     (t (nrev-fix nrev)))))))

Theorem: vl-plainarg-lvalexprs-nrev$inline-of-vl-plainarg-fix-x

(defthm vl-plainarg-lvalexprs-nrev$inline-of-vl-plainarg-fix-x
  (equal (vl-plainarg-lvalexprs-nrev$inline (vl-plainarg-fix x)
                                            nrev)
         (vl-plainarg-lvalexprs-nrev$inline x nrev)))

Theorem: vl-plainarg-lvalexprs-nrev$inline-vl-plainarg-equiv-congruence-on-x

(defthm
 vl-plainarg-lvalexprs-nrev$inline-vl-plainarg-equiv-congruence-on-x
 (implies (vl-plainarg-equiv x x-equiv)
          (equal (vl-plainarg-lvalexprs-nrev$inline x nrev)
                 (vl-plainarg-lvalexprs-nrev$inline x-equiv nrev)))
 :rule-classes :congruence)