• Top
    • Documentation
    • Books
    • Boolean-reasoning
    • Projects
    • Debugging
    • Std
    • Proof-automation
    • Macro-libraries
    • ACL2
    • Interfacing-tools
    • Hardware-verification
      • Gl
      • Esim
      • Vl2014
      • Sv
      • Fgl
      • Vwsim
      • Vl
        • Syntax
        • Loader
        • Warnings
          • Lint-warning-suppression
          • Warning-basics
          • Vl-warning
            • Vl-warning-p
            • Vl-warning-fix
            • Make-vl-warning
              • Vl-warning-equiv
              • Change-vl-warning
              • Vl-warning->suppressedp
              • Vl-warning->type
              • Vl-warning->fatalp
              • Vl-warning->args
              • Vl-warning->msg
              • 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
            • Warn
            • Vl-warninglist
            • Vl-remove-warnings
            • Vl-keep-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
      • Math
      • Testing-utilities
    • 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))))))