lean2/tests/lua/fields.lua
Leonardo de Moura 2368c936d3 test(tests/lua): exercise fields method for semantic attachments
Signed-off-by: Leonardo de Moura <leonardo@microsoft.com>
2014-01-15 17:24:18 -08:00

8 lines
276 B
Lua

assert(nVal(0):fields() == mpz(0))
assert(iVal(-1):fields() == mpz(-1))
assert(rVal("1/2"):fields() == mpq("1/2"))
local env = get_environment()
local add = env:find_object({"Nat", "add"})
assert(add)
assert(add:get_value():fields() == nil)
assert(add:get_value():is_value())