• Top
    • Documentation
    • Books
    • Boolean-reasoning
    • Projects
    • Debugging
    • Std
    • Proof-automation
    • Macro-libraries
      • B*
      • Defunc
      • Fty
      • Apt
      • Std/util
      • Defdata
      • Defrstobj
      • Seq
      • Match-tree
      • Defrstobj
      • With-supporters
      • Def-partial-measure
      • Template-subst
      • Soft
        • Soft-future-work
        • Soft-macros
        • Updates-to-workshop-material
        • Soft-implementation
          • Soft-implementation-core
          • Gen-macro2-of-macro
          • Defun-inst-implementation
          • Defthm-inst-implementation
          • Defsoft-implementation
          • Defunvar-implementation
            • Defunvar-fn
            • Show-defunvar
              • Defunvar-macro-definition
            • Defund-sk2-implementation
            • Defun-sk2-implementation
            • Define-sk2-implementation
            • Defchoose2-implementation
            • Defund2-implementation
            • Defun2-implementation
            • Define2-implementation
          • Soft-notions
        • Defthm-domain
        • Event-macros
        • Def-universal-equiv
        • Def-saved-obligs
        • With-supporters-after
        • Definec
        • Sig
        • Outer-local
        • Data-structures
      • ACL2
      • Interfacing-tools
      • Hardware-verification
      • Software-verification
      • Math
      • Testing-utilities
    • Defunvar-implementation

    Show-defunvar

    Show the event form generated by defunvar, without submitting them.

    Macro: show-defunvar

    (defmacro show-defunvar (&whole call funvar
                                    arguments arrow result &key print)
     (cons
      'defunvar-fn
      (cons
       (cons 'quote (cons funvar 'nil))
       (cons
        (cons 'quote (cons arguments 'nil))
        (cons
         (cons 'quote (cons arrow 'nil))
         (cons
          (cons 'quote (cons result 'nil))
          (cons
           (cons 'quote (cons print 'nil))
           (cons
                (cons 'quote (cons call 'nil))
                (cons (cons 'cons
                            (cons ''defunvar
                                  (cons (cons 'quote (cons funvar 'nil))
                                        'nil)))
                      '(state))))))))))

    Macro: show-defunvar

    (defmacro acl2::show-defunvar (&rest args)
      (cons 'show-defunvar args))