summaryrefslogtreecommitdiff
path: root/Build/source/texk/web2c/luatexdir/lua/lkpselib.c
diff options
context:
space:
mode:
Diffstat (limited to 'Build/source/texk/web2c/luatexdir/lua/lkpselib.c')
-rw-r--r--Build/source/texk/web2c/luatexdir/lua/lkpselib.c42
1 files changed, 42 insertions, 0 deletions
diff --git a/Build/source/texk/web2c/luatexdir/lua/lkpselib.c b/Build/source/texk/web2c/luatexdir/lua/lkpselib.c
index f76d09e5bfd..a0dcbfd2181 100644
--- a/Build/source/texk/web2c/luatexdir/lua/lkpselib.c
+++ b/Build/source/texk/web2c/luatexdir/lua/lkpselib.c
@@ -350,6 +350,15 @@ static int in_name_ok(lua_State * L)
return 1;
}
+static int in_name_ok_silent_extended(lua_State * L)
+{
+ const char *st = luaL_checkstring(L, 1);
+ TEST_PROGRAM_NAME_SET;
+ lua_pushboolean(L, kpse_in_name_ok_silent_extended(st));
+ return 1;
+}
+
+
static int lua_kpathsea_in_name_ok(lua_State * L)
{
kpathsea *kp = (kpathsea *) luaL_checkudata(L, 1, KPATHSEA_METATABLE);
@@ -358,6 +367,17 @@ static int lua_kpathsea_in_name_ok(lua_State * L)
return 1;
}
+static int lua_kpathsea_in_name_ok_silent_extended(lua_State * L)
+{
+ kpathsea *kp = (kpathsea *) luaL_checkudata(L, 1, KPATHSEA_METATABLE);
+ const char *st = luaL_checkstring(L, 2);
+ lua_pushboolean(L, kpathsea_in_name_ok_silent_extended(*kp,st));
+ return 1;
+}
+
+
+
+
static int out_name_ok(lua_State * L)
{
const char *st = luaL_checkstring(L, 1);
@@ -366,6 +386,14 @@ static int out_name_ok(lua_State * L)
return 1;
}
+static int out_name_ok_silent_extended(lua_State * L)
+{
+ const char *st = luaL_checkstring(L, 1);
+ TEST_PROGRAM_NAME_SET;
+ lua_pushboolean(L, kpse_out_name_ok_silent_extended(st));
+ return 1;
+}
+
static int lua_kpathsea_out_name_ok(lua_State * L)
{
kpathsea *kp = (kpathsea *) luaL_checkudata(L, 1, KPATHSEA_METATABLE);
@@ -374,6 +402,16 @@ static int lua_kpathsea_out_name_ok(lua_State * L)
return 1;
}
+static int lua_kpathsea_out_name_ok_silent_extended(lua_State * L)
+{
+ kpathsea *kp = (kpathsea *) luaL_checkudata(L, 1, KPATHSEA_METATABLE);
+ const char *st = luaL_checkstring(L, 2);
+ lua_pushboolean(L, kpathsea_out_name_ok_silent_extended(*kp,st));
+ return 1;
+}
+
+
+
static int expand_path(lua_State * L)
{
@@ -1021,7 +1059,9 @@ static const struct luaL_Reg kpselib_m[] = {
{"expand_var", lua_kpathsea_expand_var},
{"expand_braces", lua_kpathsea_expand_braces},
{"in_name_ok", lua_kpathsea_in_name_ok},
+ {"in_name_ok_silent_extended", lua_kpathsea_in_name_ok_silent_extended},
{"out_name_ok", lua_kpathsea_out_name_ok},
+ {"out_name_ok_silent_extended", lua_kpathsea_out_name_ok_silent_extended},
{"var_value", lua_kpathsea_var_value},
{"show_path", lua_kpathsea_show_path},
{"lookup", lua_kpathsea_lookup},
@@ -1043,7 +1083,9 @@ static const struct luaL_Reg kpselib_l[] = {
{"expand_var", expand_var},
{"expand_braces", expand_braces},
{"in_name_ok",in_name_ok},
+ {"in_name_ok_silent_extended",in_name_ok_silent_extended},
{"out_name_ok",out_name_ok},
+ {"out_name_ok_silent_extended",out_name_ok_silent_extended},
{"var_value", var_value},
{"show_path", show_path},
{"lookup", lua_kpse_lookup},