• Top
    • Documentation
    • Books
    • Recursion-and-induction
    • Boolean-reasoning
    • Debugging
    • Projects
    • Std
    • Proof-automation
    • Macro-libraries
    • ACL2
    • Interfacing-tools
    • Hardware-verification
      • Gl
      • Esim
      • Vl2014
      • Sv
      • Fgl
      • Vl
        • Syntax
        • Loader
        • Warnings
          • Lint-warning-suppression
          • Warning-basics
          • Vl-warning
            • Vl-warning-p
            • Vl-warning-fix
            • Make-vl-warning
              • Vl-warning-equiv
              • Vl-warning->suppressedp
              • Change-vl-warning
              • Vl-warning->type
              • Vl-warning->msg
              • Vl-warning->fatalp
              • Vl-warning->args
              • Vl-warning->fn
              • Vl-warning->context
            • Vl-warninglist-add-ctx
            • Vl-warninglist->types
            • Propagating-errors
            • Vl-reportcard
            • Vl-some-warning-fatalp
            • Clean-warnings
            • Lint-whole-file-suppression
            • Vl-keep-warnings
            • Warn
            • Vl-warninglist
            • Vl-remove-warnings
            • Flat-warnings
            • Vl-some-warning-of-type-p
            • Vl-msg
            • Vl-warning-add-ctx
            • Vl-print-warning
            • Vmsg-binary-concat
            • Ok
            • Vl-trace-warnings
            • Fatal
            • Vmsg
          • Getting-started
          • Utilities
          • Printer
          • Kit
          • Mlib
          • Transforms
        • X86isa
        • Svl
        • Rtl
      • Software-verification
      • Testing-utilities
      • Math
    • Vl-warning

    Make-vl-warning

    Basic constructor macro for vl-warning structures.

    Syntax
    (make-vl-warning [:type <type>] 
                     [:msg <msg>] 
                     [:args <args>] 
                     [:fn <fn>] 
                     [:fatalp <fatalp>] 
                     [:suppressedp <suppressedp>] 
                     [:context <context>]) 
    

    This is the usual way to construct vl-warning structures. It simply conses together a structure with the specified fields.

    This macro generates a new vl-warning structure from scratch. See also change-vl-warning, which can "change" an existing structure, instead.

    Definition

    This is an ordinary make- macro introduced by defprod.

    Macro: make-vl-warning

    (defmacro make-vl-warning (&rest args)
              (std::make-aggregate 'vl-warning
                                   args
                                   '((:type)
                                     (:msg)
                                     (:args)
                                     (:fn)
                                     (:fatalp)
                                     (:suppressedp)
                                     (:context))
                                   'make-vl-warning
                                   nil))

    Function: vl-warning

    (defun
        vl-warning
        (type msg args fn fatalp suppressedp context)
        (declare (xargs :guard (and (symbolp type)
                                    (stringp msg)
                                    (true-listp args)
                                    (symbolp fn)
                                    (booleanp fatalp)
                                    (booleanp suppressedp))))
        (declare (xargs :guard t))
        (let ((__function__ 'vl-warning))
             (declare (ignorable __function__))
             (b* ((type (mbe :logic (acl2::symbol-fix type)
                             :exec type))
                  (msg (mbe :logic (str-fix msg) :exec msg))
                  (args (mbe :logic (list-fix args) :exec args))
                  (fn (mbe :logic (acl2::symbol-fix fn)
                           :exec fn))
                  (fatalp (mbe :logic (acl2::bool-fix fatalp)
                               :exec fatalp))
                  (suppressedp (mbe :logic (acl2::bool-fix suppressedp)
                                    :exec suppressedp)))
                 (cons :vl-warning (list (cons 'type type)
                                         (cons 'msg msg)
                                         (cons 'args args)
                                         (cons 'fn fn)
                                         (cons 'fatalp fatalp)
                                         (cons 'suppressedp suppressedp)
                                         (cons 'context context))))))