texlive[56015] Build/source/texk/web2c/weave.ch: Purge another 'goto'
commits+ascherer at tug.org
commits+ascherer at tug.org
Sat Aug 1 21:24:29 CEST 2020
Revision: 56015
http://tug.org/svn/texlive?view=revision&revision=56015
Author: ascherer
Date: 2020-08-01 21:24:29 +0200 (Sat, 01 Aug 2020)
Log Message:
-----------
Purge another 'goto' sentence.
Modified Paths:
--------------
trunk/Build/source/texk/web2c/weave.ch
Modified: trunk/Build/source/texk/web2c/weave.ch
===================================================================
--- trunk/Build/source/texk/web2c/weave.ch 2020-08-01 14:27:00 UTC (rev 56014)
+++ trunk/Build/source/texk/web2c/weave.ch 2020-08-01 19:24:29 UTC (rev 56015)
@@ -233,13 +233,21 @@
@z
@x [33] Fix jump_out
+@ The |jump_out| procedure just cuts across all active procedure levels
+and jumps out of the program. This is the only non-local \&{goto} statement
+in \.{WEAVE}. It is used when no recovery from a particular error has
+been provided.
+
Some \PASCAL\ compilers do not implement non-local |goto| statements.
@^system dependencies@>
In such cases the code that appears at label |end_of_WEAVE| should be
copied into the |jump_out| procedure, followed by a call to a system procedure
that terminates the program.
-
@y
+@ The |jump_out| procedure just cuts across all active procedure levels
+and jumps out of the program.
+It is used when no recovery from a particular error has
+been provided.
@z
@x
@d fatal_error(#)==begin new_line; print(#); error; mark_fatal; jump_out;
More information about the tex-live-commits
mailing list.