Filtering...

constant-symbolp-tests

books/std/system/constant-symbolp-tests

Included Books

constant-symbolp assert-bang must-succeed-star
other
(in-package "ACL2")
include-book
(include-book "constant-symbolp")
include-book
(include-book "std/testing/assert-bang" :dir :system)
include-book
(include-book "std/testing/must-succeed-star" :dir :system)
other
(assert! (constant-symbolp '*primitive-formals-and-guards* (w state)))
other
(assert! (not (constant-symbolp '*this-is-not-a-constant* (w state))))
other
(must-succeed* (defconst *this-is-a-const* 0)
  (assert! (constant-symbolp '*this-is-a-const* (w state))))