• Top
    • Documentation
    • Books
    • Boolean-reasoning
    • Projects
    • Debugging
    • Community
    • Std
    • Proof-automation
    • Macro-libraries
    • ACL2
    • Interfacing-tools
    • Hardware-verification
    • Software-verification
      • Kestrel-books
        • Crypto-hdwallet
        • Apt
        • Error-checking
        • Fty-extensions
        • Isar
        • Kestrel-utilities
        • Set
        • C
          • Syntax-for-tools
            • Formalized-subset
            • Mapping-to-language-definition
            • Input-files
            • Compilation-database
              • Comp-db-entry
              • Comp-db-arg
                • Comp-db-arg-fix
                • Comp-db-arg-equiv
                • Make-comp-db-arg
                • Comp-db-arg->value
                • Comp-db-arg->separator
                  • Change-comp-db-arg
                  • Comp-db-argp
                  • Comp-db-arg->name
                • Json-to-comp-db-entry
                • Json-to-comp-db-entry-list
                • To-preprocess-db
                • To-preprocess-map
                • Comp-db-arguments-absolute-dirs
                • Comp-db-keep-only-preprocessor-args
                • Json-to-comp-db
                • Json-to-comp-db-arguments
                • Comp-db-relativize-keys
                • Json-to-comp-db-get-exec-and-arguments
                • Relativize-path
                • Preprocess-map-from-comp-file
                • Json-to-comp-db-exec-and-arguments
                • Comp-db-arguments-keep-only-preprocessor-args
                • Comp-db-arguments-escape-for-shell
                • Parse-comp-db
                • Json-to-comp-db-get-directory
                • Json-to-comp-db-get-output
                • Json-to-comp-db-get-file
                • Comp-db-drop-shared
                • Comp-db-drop-non-c
                • Comp-db-arg-list-to-string-list
                • Comp-db-absolute-dirs
                • Comp-db-escape-for-shell
                • Json-to-comp-db-try-parse-short-option
                • Preprocess-db-to-map
                • Comp-db-arg-to-string
                • Comp-db
                • Json-to-comp-db-try-parse-equal-arg
                • Defpreprocess-map-fn
                • String-escape-for-shell
                • Comp-db-arg-list
                • Irr-comp-db-arg
                • Show-warnings
                • *cc-options-space-sep*
                • *cc-options-equal-sep*
                • *cc-options-dir*
              • Printer
              • Output-files
              • Abstract-syntax-operations
              • Implementation-environments
              • Abstract-syntax
              • Concrete-syntax
              • Disambiguation
              • Validation
              • Gcc-builtins
              • Preprocessing
              • Parsing
            • Atc
            • Transformation-tools
            • Language
            • Representation
            • Insertion-sort
            • Pack
          • Soft
          • Bv
          • Imp-language
          • Ethereum
          • Event-macros
          • Java
          • Riscv
          • Bitcoin
          • Zcash
          • Yul
          • ACL2-programming-language
          • Prime-fields
          • Json
          • Syntheto
          • File-io-light
          • Cryptography
          • Number-theory
          • Axe
          • Lists-light
          • Builtins
          • Solidity
          • Helpers
          • Htclient
          • Typed-lists-light
          • Arithmetic-light
        • X86isa
        • Axe
        • Execloader
      • Math
      • Testing-utilities
    • Comp-db-arg

    Comp-db-arg->separator

    Get the separator field from a comp-db-arg.

    Signature
    (comp-db-arg->separator x) → separator
    Arguments
    x — Guard (comp-db-argp x).
    Returns
    separator — Type (stringp separator).

    This is an ordinary field accessor created by fty::defprod.

    Definitions and Theorems

    Function: comp-db-arg->separator$inline

    (defun comp-db-arg->separator$inline (x)
      (declare (xargs :guard (comp-db-argp x)))
      (declare (xargs :guard t))
      (mbe :logic
           (b* ((x (and t x)))
             (acl2::str-fix (cdr (std::da-nth 1 x))))
           :exec (cdr (std::da-nth 1 x))))

    Theorem: stringp-of-comp-db-arg->separator

    (defthm stringp-of-comp-db-arg->separator
      (b* ((separator (comp-db-arg->separator$inline x)))
        (stringp separator))
      :rule-classes :rewrite)

    Theorem: comp-db-arg->separator$inline-of-comp-db-arg-fix-x

    (defthm comp-db-arg->separator$inline-of-comp-db-arg-fix-x
      (equal (comp-db-arg->separator$inline (comp-db-arg-fix x))
             (comp-db-arg->separator$inline x)))

    Theorem: comp-db-arg->separator$inline-comp-db-arg-equiv-congruence-on-x

    (defthm
        comp-db-arg->separator$inline-comp-db-arg-equiv-congruence-on-x
      (implies (comp-db-arg-equiv x x-equiv)
               (equal (comp-db-arg->separator$inline x)
                      (comp-db-arg->separator$inline x-equiv)))
      :rule-classes :congruence)