diff options
author | Luigi Scarso <luigi.scarso@gmail.com> | 2019-03-23 06:22:21 +0000 |
---|---|---|
committer | Luigi Scarso <luigi.scarso@gmail.com> | 2019-03-23 06:22:21 +0000 |
commit | 72f705473655dffaefe68319301192856cf62b1b (patch) | |
tree | efc89d7163146cf124d1e748785c5e084561d599 /Build/source/texk/web2c/luatexdir/lua | |
parent | 6375feb2231328e6b001461cc556841267a9a13c (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.c | 20 | ||||
-rw-r--r-- | Build/source/texk/web2c/luatexdir/lua/lpdfelib.c | 2 |
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; \ |