• Top
    • Documentation
    • Books
    • Boolean-reasoning
    • Projects
    • Debugging
    • Community
    • Std
    • Proof-automation
    • Macro-libraries
    • ACL2
    • Interfacing-tools
    • Hardware-verification
      • Gl
      • Esim
      • Vl2014
      • Sv
      • Fgl
      • Vwsim
      • Vl
        • Syntax
        • Loader
          • Preprocessor
          • Vl-loadconfig
          • Vl-loadstate
          • Lexer
          • Parser
            • Parse-expressions
            • Parse-udps
            • Parse-statements
            • Parse-property
            • Vl-genelements
            • Parse-paramdecls
            • Parse-blockitems
              • Vl-ranges->dimensions
              • Vl-2005-parse-block-item-declaration-noatts
              • Vl-2012-parse-block-item-declaration-noatts
                • Vl-parse-main-data-declaration
                • Vl-parse-type-declaration
                • Vl-parse-fwd-typedef
                • Vl-parse-0+-block-item-declarations
                • Vl-parse-list-of-event-identifiers
                • Vl-parse-list-of-variable-identifiers
                • Vl-parse-realtime-declaration
                • Vl-parse-block-item-declaration-noatts
                • Vl-parse-time-declaration
                • Vl-parse-reg-declaration
                • Vl-parse-real-declaration
                • Vl-parse-integer-declaration
                • Vl-build-vardecls
                • Vl-parse-event-declaration
                • Vl-parse-block-item-declaration
                • Vl-parse-1+-let-ports
                • Vl-parse-variable-type
                • Vl-parse-let-declaration
                • Vl-parse-0+-let-ports
              • Parse-utils
              • Parse-insts
              • Parse-functions
              • Parse-assignments
              • Parse-clocking
              • Parse-strengths
              • Vl-parse-genvar-declaration
              • Vl-parse
              • Parse-netdecls
              • Parse-asserts
              • Vl-maybe-parse-lifetime
              • Parse-dpi-import-export
              • Parse-ports
              • Parse-timeunits
              • Seq
              • Parse-packages
              • Parse-eventctrl
            • Vl-load-merge-descriptions
            • Vl-find-basename/extension
            • Vl-load-file
            • Vl-loadresult
            • Scope-of-defines
            • Vl-find-file
            • Vl-flush-out-descriptions
            • Vl-description
            • Vl-read-file
            • Vl-includeskips-report-gather
            • Vl-load-main
            • Extended-characters
            • Vl-load
            • Vl-load-description
            • Vl-descriptions-left-to-load
            • Inject-warnings
            • Vl-preprocess-debug
            • Vl-write-preprocessor-debug-file
            • Vl-read-file-report-gather
            • Vl-load-descriptions
            • Vl-load-files
            • Translate-off
            • Vl-load-read-file-hook
            • Vl-read-file-report
            • Vl-loadstate-pad
            • Vl-load-summary
            • Vl-collect-modules-from-descriptions
            • Vl-loadstate->warnings
            • Vl-iskips-report
            • Vl-descriptionlist
          • Warnings
          • Getting-started
          • Utilities
          • Printer
          • Kit
          • Mlib
          • Transforms
        • X86isa
        • Svl
        • Rtl
      • Software-verification
      • Math
      • Testing-utilities
    • Parse-blockitems

    Vl-2012-parse-block-item-declaration-noatts

    Match a whole block_item_declaration, except for any attributes, for SystemVerilog-2012.

    Signature
    (vl-2012-parse-block-item-declaration-noatts 
         atts &key (tokstream 'tokstream) 
         (config 'config)) 
     
      → 
    (mv errmsg? value new-tokstream)
    Arguments
    config — Guard (vl-loadconfig-p config).

    SystemVerilog-2012 Grammar:

    block_item_declaration ::=
        {attribute_instance} data_declaration                          // no semicolon
      | {attribute_instance} local_parameter_declaration ';'
      | {attribute_instance} parameter_declaration       ';'
      | {attribute_instance} overload_declaration                      // no semicolon
      | {attribute_instance} let_declaration                           // no semicolon

    The data_declaration subsumes the reg, integer, time, real, realtime, and event cases in Verilog-2005.

    We don't yet support overload or let declarations, but we have:

    overload_declaration ::= 'bind' ...
    let_declaration ::= 'let' ...

    So we can easily identify when these things occur. Moreover we know that a parameter or local parameter declaration always starts with 'parameter' or 'localparam', so we can at least gracefully fail if we encounter anything we don't support.

    Definitions and Theorems

    Function: vl-2012-parse-block-item-declaration-noatts-fn

    (defun vl-2012-parse-block-item-declaration-noatts-fn
           (atts tokstream config)
     (declare (xargs :stobjs (tokstream)))
     (declare (xargs :guard (vl-loadconfig-p config)))
     (declare (ignorable config))
     (declare (xargs :guard (vl-atts-p atts)))
     (let ((__function__ 'vl-2012-parse-block-item-declaration-noatts))
      (declare (ignorable __function__))
      (seq
       tokstream
       (when
        (vl-is-token? :vl-kwd-bind)
        (return-raw
         (vl-parse-error
           "overload declarations (\"bind ...\") are not yet supported")))
       (when (vl-is-some-token? '(:vl-kwd-localparam :vl-kwd-parameter))
             (elems := (vl-parse-param-or-localparam-declaration
                            atts
                            '(:vl-kwd-localparam :vl-kwd-parameter)))
             (:= (vl-match-token :vl-semi))
             (return elems))
       (when
        (vl-is-token? :vl-kwd-import)
        (return-raw
             (if (vl-plausible-start-of-package-import-p)
                 (vl-parse-package-import-declaration atts)
               (vl-parse-error "Expected package name after import."))))
       (when
        (vl-is-token? :vl-kwd-typedef)
        (ans := (vl-parse-type-declaration atts))
        (return-raw
          (if (eq (tag ans) :vl-typedef)
              (mv nil (list ans) tokstream)
            (vl-parse-error
                 "Not implemented: forward typedefs as block items."))))
       (when (vl-is-token? :vl-kwd-let)
             (ans := (vl-parse-let-declaration atts))
             (return (list ans)))
       (elems := (vl-parse-main-data-declaration atts))
       (return elems))))

    Theorem: vl-2012-parse-block-item-declaration-noatts-fails-gracefully

    (defthm vl-2012-parse-block-item-declaration-noatts-fails-gracefully
     (implies
      (mv-nth 0
              (vl-2012-parse-block-item-declaration-noatts atts))
      (not
          (mv-nth 1
                  (vl-2012-parse-block-item-declaration-noatts atts)))))

    Theorem: vl-warning-p-of-vl-2012-parse-block-item-declaration-noatts

    (defthm vl-warning-p-of-vl-2012-parse-block-item-declaration-noatts
     (iff
       (vl-warning-p
            (mv-nth 0
                    (vl-2012-parse-block-item-declaration-noatts atts)))
       (mv-nth 0
               (vl-2012-parse-block-item-declaration-noatts atts))))

    Theorem: vl-2012-parse-block-item-declaration-noatts-result

    (defthm vl-2012-parse-block-item-declaration-noatts-result
     (implies
      (and (force (vl-atts-p atts)))
      (vl-blockitemlist-p
          (mv-nth 1
                  (vl-2012-parse-block-item-declaration-noatts atts)))))

    Theorem: vl-2012-parse-block-item-declaration-noatts-true-listp

    (defthm vl-2012-parse-block-item-declaration-noatts-true-listp
      (true-listp
           (mv-nth 1
                   (vl-2012-parse-block-item-declaration-noatts atts)))
      :rule-classes :type-prescription)

    Theorem: vl-2012-parse-block-item-declaration-noatts-count-strong

    (defthm vl-2012-parse-block-item-declaration-noatts-count-strong
     (and
      (<=
       (vl-tokstream-measure
            :tokstream
            (mv-nth 2
                    (vl-2012-parse-block-item-declaration-noatts atts)))
       (vl-tokstream-measure))
      (implies
       (not (mv-nth 0
                    (vl-2012-parse-block-item-declaration-noatts atts)))
       (<
        (vl-tokstream-measure
            :tokstream
            (mv-nth 2
                    (vl-2012-parse-block-item-declaration-noatts atts)))
        (vl-tokstream-measure))))
     :rule-classes ((:rewrite) (:linear)))