summaryrefslogtreecommitdiff
path: root/Build/source/texk/web2c/luatexdir/tex/mainbody.w
diff options
context:
space:
mode:
Diffstat (limited to 'Build/source/texk/web2c/luatexdir/tex/mainbody.w')
-rw-r--r--Build/source/texk/web2c/luatexdir/tex/mainbody.w15
1 files changed, 8 insertions, 7 deletions
diff --git a/Build/source/texk/web2c/luatexdir/tex/mainbody.w b/Build/source/texk/web2c/luatexdir/tex/mainbody.w
index a8d35d7ac56..ad0bb783a1f 100644
--- a/Build/source/texk/web2c/luatexdir/tex/mainbody.w
+++ b/Build/source/texk/web2c/luatexdir/tex/mainbody.w
@@ -549,7 +549,8 @@ been scanned and |its_all_over|\kern-2pt.
void final_cleanup(void)
{
int c; /* 0 for \.{\\end}, 1 for \.{\\dump} */
- halfword i; /* for looping marks */
+ halfword i; /* for looping marks */
+ halfword t; /* was a global temp_ptr */
c = cur_chr;
if (job_name == 0)
open_log_file();
@@ -578,17 +579,16 @@ void final_cleanup(void)
tprint(" was incomplete)");
if_line = if_line_field(cond_ptr);
cur_if = subtype(cond_ptr);
- temp_ptr = cond_ptr;
+ t = cond_ptr;
cond_ptr = vlink(cond_ptr);
- flush_node(temp_ptr);
+ flush_node(t);
}
if (callback_defined(stop_run_callback) == 0)
if (history != spotless)
if ((history == warning_issued) || (interaction < error_stop_mode))
if (selector == term_and_log) {
selector = term_only;
- tprint_nl
- ("(see the transcript file for additional information)");
+ tprint_nl("(see the transcript file for additional information)");
selector = term_and_log;
}
if (c == 1) {
@@ -602,8 +602,9 @@ void final_cleanup(void)
}
for (c = last_box_code; c <= vsplit_code; c++)
flush_node_list(disc_ptr[c]);
- if (last_glue != max_halfword)
- delete_glue_ref(last_glue);
+ if (last_glue != max_halfword) {
+ flush_node(last_glue);
+ }
while (pseudo_files != null)
pseudo_close(); /* flush pseudo files */
store_fmt_file();