From d3077d7fb1891b74ba54dfd39d2cdd6044cb92c0 Mon Sep 17 00:00:00 2001 From: Hironobu Yamashita Date: Mon, 19 Jul 2021 12:08:15 +0000 Subject: tex.ch: initialize the variable limit (H. Kitagawa) alephdir/com16bit.ch: sync with tex.ch git-svn-id: svn://tug.org/texlive/trunk@59986 c570f23f-e606-0410-a88d-b1316a301751 --- Build/source/texk/web2c/tex.ch | 16 ++++++++++++++++ 1 file changed, 16 insertions(+) (limited to 'Build/source/texk/web2c/tex.ch') diff --git a/Build/source/texk/web2c/tex.ch b/Build/source/texk/web2c/tex.ch index d11f42da855..56440fe1c36 100644 --- a/Build/source/texk/web2c/tex.ch +++ b/Build/source/texk/web2c/tex.ch @@ -785,6 +785,13 @@ if translate_filename then begin end; @z +@x [5.??] term_input: set limit when fatal_error +if not input_ln(term_in,true) then fatal_error("End of file on the terminal!"); +@y +if not input_ln(term_in,true) then begin + limit:=0; fatal_error("End of file on the terminal!"); end; +@z + @x [6.73] l.1732 - Add unspecified_mode. @d error_stop_mode=3 {stops at every opportunity to interact} @y @@ -1530,6 +1537,15 @@ cur_order:=co_backup; link(backup_head):=backup_backup; decr(expand_depth_count); @z +@x [27.???] +else fatal_error("*** (cannot \read from terminal in nonstop modes)") +@y +else begin + limit:=0; + fatal_error("*** (cannot \read from terminal in nonstop modes)"); + end +@z + @x [28.501] l.9747 - \eof18 if_eof_code: begin scan_four_bit_int; b:=(read_open[cur_val]=closed); end; -- cgit v1.2.3