• Top
  • Documentation
  • Books
  • Boolean-reasoning
  • Projects
  • Debugging
  • Std
  • Proof-automation
  • Macro-libraries
  • ACL2
  • Interfacing-tools
    • Io
    • Defttag
    • Sys-call
    • Save-exec
    • Quicklisp
    • Std/io
    • Oslib
    • Bridge
    • Clex
    • Tshell
    • Unsound-eval
    • Hacker
    • ACL2s-interface
    • Startup-banner
    • Command-line
      • Save-exec
      • Argv
      • Getopt
        • Demo-p
        • Defoptions
        • Demo2
        • Parsers
        • Sanity-check-formals
        • Formal->parser
        • Formal->argname
        • Formal->longname
        • Formal->alias
        • Formal->usage
        • Formal->merge
        • Formal->hiddenp
  • Hardware-verification
  • Software-verification
  • Math
  • Testing-utilities

• Getopt

Formal->merge

Signature

(formal->merge x) → merge-fn

Arguments

x — Guard (formal-p x).

Returns

merge-fn — Type (symbolp merge-fn).

Definitions and Theorems

Function: formal->merge

(defun formal->merge (x)
  (declare (xargs :guard (formal-p x)))
  (let ((__function__ 'formal->merge))
    (declare (ignorable __function__))
    (b* (((formal x) x)
         (merge (cdr (assoc :merge x.opts)))
         ((unless (symbolp merge))
          (raise "In ~x0, :merge is not even a symbol: ~x1."
                 x.name merge)))
      merge)))