• Top
    • Documentation
    • Books
    • Recursion-and-induction
    • Boolean-reasoning
    • Projects
    • Debugging
    • Std
    • Proof-automation
    • Macro-libraries
    • ACL2
    • Interfacing-tools
    • Hardware-verification
      • Gl
      • Esim
      • Vl2014
        • Warnings
          • Vl-warninglist->types
          • Vl-warning
          • Propagating-errors
          • Vl-reportcard
          • Vl-warning-sort
          • Lint-warning-suppression
          • Clean-warnings
          • Warn
          • Vl-some-warning-fatalp
            • Vl-print-warnings-with-header
            • Vl-print-warnings-with-named-header
            • Flat-warnings
            • Vl-keep-warnings
            • Vl-remove-warnings
            • Vl-print-warnings
            • Vl-some-warning-of-type-p
            • Vl-clean-warnings
            • Vl-warnings-to-string
            • Vl-warninglist
            • Vl-print-warning
            • Ok
            • Vl-trace-warnings
            • Fatal
          • Primitives
          • Use-set
          • 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
    • Warnings

    Vl-some-warning-fatalp

    Check if any warning is marked as fatal.

    Signature
    (vl-some-warning-fatalp x) → bool
    Arguments
    x — Guard (vl-warninglist-p x).
    Returns
    bool — Type (booleanp bool).

    Definitions and Theorems

    Function: vl-some-warning-fatalp

    (defun vl-some-warning-fatalp (x)
           (declare (xargs :guard (vl-warninglist-p x)))
           (let ((__function__ 'vl-some-warning-fatalp))
                (declare (ignorable __function__))
                (cond ((atom x) nil)
                      ((vl-warning->fatalp (car x)) t)
                      (t (vl-some-warning-fatalp (cdr x))))))

    Theorem: booleanp-of-vl-some-warning-fatalp

    (defthm booleanp-of-vl-some-warning-fatalp
            (b* ((bool (vl-some-warning-fatalp x)))
                (booleanp bool))
            :rule-classes :type-prescription)

    Theorem: vl-some-warning-fatalp-when-not-consp

    (defthm vl-some-warning-fatalp-when-not-consp
            (implies (not (consp x))
                     (equal (vl-some-warning-fatalp x) nil)))

    Theorem: vl-some-warning-fatalp-of-cons

    (defthm vl-some-warning-fatalp-of-cons
            (equal (vl-some-warning-fatalp (cons a x))
                   (or (if (vl-warning->fatalp a) t nil)
                       (vl-some-warning-fatalp x))))

    Theorem: vl-some-warning-fatalp-of-append

    (defthm vl-some-warning-fatalp-of-append
            (equal (vl-some-warning-fatalp (append x y))
                   (or (vl-some-warning-fatalp x)
                       (vl-some-warning-fatalp y))))

    Theorem: vl-some-warning-fatalp-of-list-fix

    (defthm vl-some-warning-fatalp-of-list-fix
            (equal (vl-some-warning-fatalp (list-fix x))
                   (vl-some-warning-fatalp x)))

    Theorem: vl-some-warning-fatalp-preserves-set-equiv

    (defthm vl-some-warning-fatalp-preserves-set-equiv
            (implies (set-equiv x x-equiv)
                     (equal (vl-some-warning-fatalp x)
                            (vl-some-warning-fatalp x-equiv)))
            :rule-classes (:congruence))

    Theorem: vl-some-warning-fatalp-of-vl-warninglist-fix-x

    (defthm vl-some-warning-fatalp-of-vl-warninglist-fix-x
            (equal (vl-some-warning-fatalp (vl-warninglist-fix x))
                   (vl-some-warning-fatalp x)))

    Theorem: vl-some-warning-fatalp-vl-warninglist-equiv-congruence-on-x

    (defthm vl-some-warning-fatalp-vl-warninglist-equiv-congruence-on-x
            (implies (vl-warninglist-equiv x x-equiv)
                     (equal (vl-some-warning-fatalp x)
                            (vl-some-warning-fatalp x-equiv)))
            :rule-classes :congruence)