• 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-parse-property-list-of-arguments
                • Vl-parse-event-expression-fragment
                • Vl-parse-sequence-match-item
                • Vl-parse-property-actual-arg
                • Vl-parse-scoped-or-hierarchical-identifier
                • Vl-parse-cycledelayrange
                • Vl-parse-sequence-abbrev
                • Vl-parse-boolean-abbrev
                • Vl-parse-1+-expression-or-dists-separated-by-commas
                • Vl-parse-property-acceptop
                • Vl-parse-dist-item
                • Vl-parse-sequence-match-item-list
                • Vl-parse-property-spec
                • Vl-parse-impl-prop-expr-op
                • Vl-parse-expression-or-dist
                • Vl-parse-dist-list
                • Vl-alternating-propexpr/op-list-p
                • Vl-left-associate-alternating-propexpr/op-list
                • Vl-left-associate-delay-se-tail
                • Vl-delay-se-tail-p
                • Vl-parse-1+-named-property-list-of-arguments
                • Vl-parse-property-low-prec-unary
                • Vl-parse-within-sequence-expr-aux
                • Vl-parse-throughout-sequence-expr
                • Vl-parse-or-property-expr-aux
                • Vl-parse-intersect-sequence-expr-aux
                • Vl-parse-intersect-sequence-expr
                • Vl-parse-delay-sequence-expr
                • Vl-parse-assign-sequence-expr
                • Vl-parse-and-property-expr-aux
                • Vl-parse-1+-property-case-items
                • Vl-parse-within-sequence-expr
                • Vl-parse-or-property-expr
                • Vl-parse-instance-property-expr
                • Vl-parse-iff-property-expr
                • Vl-parse-delay-sequence-expr-tail
                • Vl-parse-and-property-expr
                • Vl-parse-until-property-expr
                • Vl-parse-strength-property-expr
                • Vl-parse-repeat-sequence-expr
                • Vl-parse-property-expr
                • Vl-parse-property-case-item
                • Vl-parse-not-property-expr
                • Vl-parse-impl-property-expr
                • Vl-parse-firstmatch-sequence-expr
              • Vl-genelements
              • Parse-paramdecls
              • Parse-blockitems
              • 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
    • Vl-parse-property-list-of-arguments

    Vl-parse-event-expression-fragment

    Special subset of event_expression for use only in sequence_list_of_actuals.

    Signature
    (vl-parse-event-expression-fragment &key (tokstream 'tokstream) 
                                        (config 'config)) 
     
      → 
    (mv errmsg? value new-tokstream)
    Arguments
    config — Guard (vl-loadconfig-p config).

    This is similar to vl-parse-event-expression except that our goal is to avoid ambiguity with sequence_expr. In particular, we don't allow:

    • Top-level bare expressions without even an edge identifier,
    • Top-level or expressions
    • Top-level comma-separated expressions
    • Parentheses expressions like (foo) where there's only a single expression in the parens without any edge specifier.

    Definitions and Theorems

    Function: vl-parse-event-expression-fragment-fn

    (defun vl-parse-event-expression-fragment-fn (tokstream config)
     (declare (xargs :stobjs (tokstream)))
     (declare (xargs :guard (vl-loadconfig-p config)))
     (declare (ignorable config))
     (let ((__function__ 'vl-parse-event-expression-fragment))
      (declare (ignorable __function__))
      (seq
       tokstream
       (when
        (vl-is-token? :vl-lparen)
        (:= (vl-match))
        (evatoms := (vl-parse-event-expression))
        (:= (vl-match-token :vl-rparen))
        (when
         (and (eql (len evatoms) 1)
              (equal (vl-evatom->type (car evatoms))
                     :vl-noedge))
         (return-raw
          (vl-parse-error
           "Want to backtrack to treat a lone expression (foo) like
                                 a sequence expression instead of an event expression.")))
        (return evatoms))
       (edge := (vl-match-some-token
                     '(:vl-kwd-posedge :vl-kwd-negedge :vl-kwd-edge)))
       (expr := (vl-parse-expression))
       (when
        (vl-is-token? :vl-kwd-iff)
        (return-raw
         (vl-parse-error
          "BOZO need to implement event_expressions with 'iff' clauses.")))
       (return (let ((edgetype (case (vl-token->type edge)
                                     (:vl-kwd-posedge :vl-posedge)
                                     (:vl-kwd-negedge :vl-negedge)
                                     (:vl-kwd-edge :vl-edge)
                                     (t (impossible)))))
                 (list (vl-evatom edgetype expr)))))))

    Theorem: vl-parse-event-expression-fragment-fails-gracefully

    (defthm vl-parse-event-expression-fragment-fails-gracefully
      (implies (mv-nth 0 (vl-parse-event-expression-fragment))
               (not (mv-nth 1
                            (vl-parse-event-expression-fragment)))))

    Theorem: vl-warning-p-of-vl-parse-event-expression-fragment

    (defthm vl-warning-p-of-vl-parse-event-expression-fragment
     (iff (vl-warning-p (mv-nth 0 (vl-parse-event-expression-fragment)))
          (mv-nth 0
                  (vl-parse-event-expression-fragment))))

    Theorem: vl-parse-event-expression-fragment-result

    (defthm vl-parse-event-expression-fragment-result
     (implies
       (and t)
       (vl-evatomlist-p (mv-nth 1
                                (vl-parse-event-expression-fragment)))))

    Theorem: vl-parse-event-expression-fragment-true-listp

    (defthm vl-parse-event-expression-fragment-true-listp
      (true-listp (mv-nth 1 (vl-parse-event-expression-fragment)))
      :rule-classes :type-prescription)

    Theorem: vl-parse-event-expression-fragment-count-strong

    (defthm vl-parse-event-expression-fragment-count-strong
     (and
      (<=
        (vl-tokstream-measure
             :tokstream (mv-nth 2 (vl-parse-event-expression-fragment)))
        (vl-tokstream-measure))
      (implies
       (not (mv-nth 0 (vl-parse-event-expression-fragment)))
       (<
        (vl-tokstream-measure
             :tokstream (mv-nth 2 (vl-parse-event-expression-fragment)))
        (vl-tokstream-measure))))
     :rule-classes ((:rewrite) (:linear)))

    Theorem: vl-parse-event-expression-fragment-errors-on-eof

    (defthm vl-parse-event-expression-fragment-errors-on-eof
      (implies (atom (vl-tokstream->tokens))
               (mv-nth 0
                       (vl-parse-event-expression-fragment))))