summaryrefslogtreecommitdiff
path: root/Build/source/texk/web2c/luatexdir/lua
diff options
context:
space:
mode:
authorLuigi Scarso <luigi.scarso@gmail.com>2019-03-23 06:22:21 +0000
committerLuigi Scarso <luigi.scarso@gmail.com>2019-03-23 06:22:21 +0000
commit72f705473655dffaefe68319301192856cf62b1b (patch)
treeefc89d7163146cf124d1e748785c5e084561d599 /Build/source/texk/web2c/luatexdir/lua
parent6375feb2231328e6b001461cc556841267a9a13c (diff)
fix to lpdfelib; slightly better --recorder; updated manual
git-svn-id: svn://tug.org/texlive/trunk@50545 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Build/source/texk/web2c/luatexdir/lua')
-rw-r--r--Build/source/texk/web2c/luatexdir/lua/lkpselib.c20
-rw-r--r--Build/source/texk/web2c/luatexdir/lua/lpdfelib.c2
2 files changed, 21 insertions, 1 deletions
diff --git a/Build/source/texk/web2c/luatexdir/lua/lkpselib.c b/Build/source/texk/web2c/luatexdir/lua/lkpselib.c
index b1dafa58ac2..fd80ea0c270 100644
--- a/Build/source/texk/web2c/luatexdir/lua/lkpselib.c
+++ b/Build/source/texk/web2c/luatexdir/lua/lkpselib.c
@@ -825,6 +825,24 @@ static int lua_kpathsea_new(lua_State * L)
return 1;
}
+static int lua_record_input_file(lua_State * L)
+{
+ const char *name = lua_tostring(L, 1);
+ if (name != NULL) {
+ recorder_record_input(name);
+ }
+ return 0;
+}
+
+static int lua_record_output_file(lua_State * L)
+{
+ const char *name = lua_tostring(L, 1);
+ if (name != NULL) {
+ recorder_record_output(name);
+ }
+ return 0;
+}
+
static const struct luaL_Reg kpselib_m[] = {
{"__gc", lua_kpathsea_finish},
{"init_prog", lua_kpathsea_init_prog},
@@ -838,6 +856,8 @@ static const struct luaL_Reg kpselib_m[] = {
{"lookup", lua_kpathsea_lookup},
{"version", lua_kpse_version},
{"default_texmfcnf", show_texmfcnf},
+ {"record_input_file", lua_record_input_file},
+ {"record_output_file", lua_record_output_file},
{NULL, NULL} /* sentinel */
};
diff --git a/Build/source/texk/web2c/luatexdir/lua/lpdfelib.c b/Build/source/texk/web2c/luatexdir/lua/lpdfelib.c
index c4f598bf4e3..8f4f56d2d1e 100644
--- a/Build/source/texk/web2c/luatexdir/lua/lpdfelib.c
+++ b/Build/source/texk/web2c/luatexdir/lua/lpdfelib.c
@@ -259,7 +259,7 @@ define_to_string(stream, "pdfe.stream")
static int pdfelib_tostring_reference(lua_State * L) { \
pdfe_reference *p = check_isreference(L, 1); \
if (p != NULL) { \
- lua_pushfstring(L, "<pdfe.reference " "%i>", p->onum); \
+ lua_pushfstring(L, "<pdfe.reference " "%i>", (int) p->onum); \
return 1; \
} \
return 0; \