• Top
    • Documentation
    • Books
    • Boolean-reasoning
    • Projects
    • Debugging
    • Community
    • Std
    • Proof-automation
    • Macro-libraries
    • ACL2
    • Interfacing-tools
    • Hardware-verification
      • Gl
      • Esim
      • Vl2014
        • Warnings
        • Primitives
        • Use-set
        • Syntax
        • Getting-started
        • Utilities
        • Loader
          • Preprocessor
          • Vl-loadconfig
          • Lexer
          • Vl-loadstate
          • Parser
            • Parse-expressions
            • Parse-udps
            • Vl-genelements
            • Parse-paramdecls
            • Parse-blockitems
            • Parse-utils
            • Parse-insts
            • Parse-datatype
            • Parse-functions
            • Parse-datatypes
            • Parse-strengths
            • Vl-parse-genvar-declaration
            • Vl-parse
            • Parse-ports
              • Parse-port-types
              • Sv-ansi-portdecls
                • Vl-parsed-ansi-port-p
                • Vl-parse-ansi-port-header
                • Vl-parse-ansi-port-declaration
                • Vl-parse-1+-ansi-port-declarations
                • Vl-parsed-interface-head
                • Vl-parse-optional-port-direction
                  • Vl-parsed-ansi-portlist-p
                  • Vl-parsed-ansi-head
                  • *vl-directions-kwds*
                  • *vl-directions-kwd-alist*
                • Creating-portdecls/vardecls
                • Sv-non-ansi-portdecls
                • Verilog-2005-ports
                • Sv-ansi-port-interpretation
                • Verilog-2005-portdecls
              • Seq
              • Parse-packages
            • Vl-load-merge-descriptions
            • Scope-of-defines
            • Vl-load-file
            • Vl-flush-out-descriptions
            • Vl-description
            • Vl-loadresult
            • Vl-read-file
            • Vl-find-basename/extension
            • Vl-find-file
            • Vl-read-files
            • Extended-characters
            • Vl-load
            • Vl-load-main
            • Vl-load-description
            • Vl-descriptions-left-to-load
            • Inject-warnings
            • Vl-load-descriptions
            • Vl-load-files
            • Vl-load-summary
            • Vl-collect-modules-from-descriptions
            • Vl-descriptionlist
          • Transforms
          • Lint
          • Mlib
          • Server
          • Kit
          • Printer
          • Esim-vl
          • Well-formedness
        • Sv
        • Fgl
        • Vwsim
        • Vl
        • X86isa
        • Svl
        • Rtl
      • Software-verification
      • Math
      • Testing-utilities
    • Sv-ansi-portdecls

    Vl-parse-optional-port-direction

    Signature
    (vl-parse-optional-port-direction &key (tokstream 'tokstream) 
                                      (config 'config)) 
     
      → 
    (mv errmsg? value new-tokstream)
    Arguments
    config — Guard (vl-loadconfig-p config).

    Definitions and Theorems

    Function: vl-parse-optional-port-direction-fn

    (defun vl-parse-optional-port-direction-fn (tokstream config)
      (declare (xargs :stobjs (tokstream)))
      (declare (xargs :guard (vl-loadconfig-p config)))
      (declare (ignorable config))
      (let ((__function__ 'vl-parse-optional-port-direction))
        (declare (ignorable __function__))
        (seq tokstream
             (when (vl-is-some-token? *vl-directions-kwds*)
                   (tok := (vl-match))
                   (return (cdr (assoc (vl-token->type tok)
                                       *vl-directions-kwd-alist*))))
             (return nil))))

    Theorem: vl-parse-optional-port-direction-never-fails

    (defthm vl-parse-optional-port-direction-never-fails
      (not (mv-nth 0 (vl-parse-optional-port-direction))))

    Theorem: vl-parse-optional-port-direction-result

    (defthm vl-parse-optional-port-direction-result
      (implies (and (not (mv-nth 0 (vl-parse-optional-port-direction)))
                    (and t))
               (vl-maybe-direction-p
                    (mv-nth 1 (vl-parse-optional-port-direction)))))

    Theorem: vl-parse-optional-port-direction-count-strong-on-value

    (defthm vl-parse-optional-port-direction-count-strong-on-value
     (and
      (<= (vl-tokstream-measure
               :tokstream (mv-nth 2 (vl-parse-optional-port-direction)))
          (vl-tokstream-measure))
      (implies
       (mv-nth 1 (vl-parse-optional-port-direction))
       (< (vl-tokstream-measure
               :tokstream (mv-nth 2 (vl-parse-optional-port-direction)))
          (vl-tokstream-measure))))
     :rule-classes ((:rewrite) (:linear)))