summaryrefslogtreecommitdiff
path: root/Build/source/texk/web2c/luatexdir/tex/maincontrol.c
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2021-11-07 22:51:07 +0000
committerKarl Berry <karl@freefriends.org>2021-11-07 22:51:07 +0000
commit13db542d785efd5e247e6ce1bb00ddcf3e6a9e0c (patch)
treee4f840ce031276f5739a43ab71b67803eada1f99 /Build/source/texk/web2c/luatexdir/tex/maincontrol.c
parent6db201ee577d919c52166a873f7f3755b4113c1f (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.c8
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);