Filtering...

fundef-enabledp-tests

books/std/system/fundef-enabledp-tests

Included Books

fundef-enabledp assert-bang must-succeed-star
other
(in-package "ACL2")
include-book
(include-book "fundef-enabledp")
include-book
(include-book "std/testing/assert-bang" :dir :system)
include-book
(include-book "std/testing/must-succeed-star" :dir :system)
other
(must-succeed* (defun f (x) x)
  (assert! (fundef-enabledp 'f state)))
other
(must-succeed* (defund f (x) x)
  (assert! (not (fundef-enabledp 'f state))))