diff options
author | Karl Berry <karl@freefriends.org> | 2021-11-07 22:51:07 +0000 |
---|---|---|
committer | Karl Berry <karl@freefriends.org> | 2021-11-07 22:51:07 +0000 |
commit | 13db542d785efd5e247e6ce1bb00ddcf3e6a9e0c (patch) | |
tree | e4f840ce031276f5739a43ab71b67803eada1f99 /Build/source/texk/web2c/luatexdir/tex/maincontrol.c | |
parent | 6db201ee577d919c52166a873f7f3755b4113c1f (diff) |
new cross-engine primitive \showstream, from Marcel
git-svn-id: svn://tug.org/texlive/trunk@60992 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Build/source/texk/web2c/luatexdir/tex/maincontrol.c')
-rw-r--r-- | Build/source/texk/web2c/luatexdir/tex/maincontrol.c | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/Build/source/texk/web2c/luatexdir/tex/maincontrol.c b/Build/source/texk/web2c/luatexdir/tex/maincontrol.c index 22f601ba275..9aec6c12ff4 100644 --- a/Build/source/texk/web2c/luatexdir/tex/maincontrol.c +++ b/Build/source/texk/web2c/luatexdir/tex/maincontrol.c @@ -3968,6 +3968,10 @@ void show_whatever(void) int m; /* upper bound on |fi_or_else| codes */ int l; /* line where that conditional began */ int n; /* level of \.{\\if...\\fi} nesting */ + int saved_selector; /* previous selector. Must be distinct from the global err_old_setting. */ + saved_selector = selector; + if (file_can_be_written(show_stream_par)) + selector = show_stream_par; switch (cur_chr) { case show_lists: begin_diagnostic(); @@ -4062,6 +4066,10 @@ void show_whatever(void) } } COMMON_ENDING: + if (valid_write_file(selector)) { + selector = saved_selector; + return; + } if (interaction < error_stop_mode) { help0(); decr(error_count); |