diff options
author | Andreas Scherer <andreas_tex@freenet.de> | 2020-08-01 14:27:00 +0000 |
---|---|---|
committer | Andreas Scherer <andreas_tex@freenet.de> | 2020-08-01 14:27:00 +0000 |
commit | d15614d79be6264bf014c5d5c4713280329fcae9 (patch) | |
tree | 23720ff104acbef78d9c7dbf39b3b73ec8f5a13e /Build/source/texk/web2c/mf.ch | |
parent | 2b48c58a3269e00f95e2769500c0230b2b7f397a (diff) |
Purge more 'goto' and 'jump_out' leftovers.
Editor's note: Trying to make the WEB changefiles fully represent the
actual codes as modified for Web2c/TeX Live is like opening a veritable
can of worms.
git-svn-id: svn://tug.org/texlive/trunk@56014 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Build/source/texk/web2c/mf.ch')
-rw-r--r-- | Build/source/texk/web2c/mf.ch | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/Build/source/texk/web2c/mf.ch b/Build/source/texk/web2c/mf.ch index bfd297440e8..411ec092ccd 100644 --- a/Build/source/texk/web2c/mf.ch +++ b/Build/source/texk/web2c/mf.ch @@ -646,12 +646,14 @@ procedure jump_out; begin goto end_of_MF; end; @y -@ The |jump_out| procedure just cuts across all active procedure levels and -simply calls +@ The |jump_out| procedure just cuts across all active procedure levels. +The body of |jump_out| simply calls `|close_files_and_terminate|;\thinspace' followed by a call on some system procedure that quietly terminates the program. @^system dependencies@> +@f noreturn==procedure + @d do_final_end==begin update_terminal; ready_already:=0; |