michael/lean2
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

feat(frontends/lean): expose is_explicit function in the Lua API

Browse source 
Signed-off-by: Leonardo de Moura <leonardo@microsoft.com>
This commit is contained in:
Leonardo de Moura 2014-01-07 17:36:27 -08:00
parent 4fdc0406be
commit 6f4ca7bd2a
1 changed files with 7 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

7
src/frontends/lean/register_module.cpp
View file

@ -135,12 +135,19 @@ static int mk_lean_formatter(lua_State * L) {
return push_formatter(L, mk_pp_formatter(to_environment(L, 1))); return push_formatter(L, mk_pp_formatter(to_environment(L, 1)));
} }
static int is_explicit(lua_State * L) {
ro_shared_environment env(L, 1);
lua_pushboolean(L, is_explicit(env, to_name_ext(L, 2)));
return 1;
}
void open_frontend_lean(lua_State * L) { void open_frontend_lean(lua_State * L) {
open_macros(L); open_macros(L);
SET_GLOBAL_FUN(mk_environment, "environment"); SET_GLOBAL_FUN(mk_environment, "environment");
SET_GLOBAL_FUN(mk_lean_formatter, "lean_formatter"); SET_GLOBAL_FUN(mk_lean_formatter, "lean_formatter");
SET_GLOBAL_FUN(parse_lean_expr, "parse_lean"); SET_GLOBAL_FUN(parse_lean_expr, "parse_lean");
SET_GLOBAL_FUN(parse_lean_cmds, "parse_lean_cmds"); SET_GLOBAL_FUN(parse_lean_cmds, "parse_lean_cmds");
SET_GLOBAL_FUN(is_explicit, "is_explicit");
} }
void register_frontend_lean_module() { void register_frontend_lean_module() {