summaryrefslogtreecommitdiff
path: root/Build/source/texk/web2c/luatexdir/luatangle.ch
diff options
context:
space:
mode:
Diffstat (limited to 'Build/source/texk/web2c/luatexdir/luatangle.ch')
-rw-r--r--Build/source/texk/web2c/luatexdir/luatangle.ch15
1 files changed, 15 insertions, 0 deletions
diff --git a/Build/source/texk/web2c/luatexdir/luatangle.ch b/Build/source/texk/web2c/luatexdir/luatangle.ch
index 936e4d62ab4..809af366a69 100644
--- a/Build/source/texk/web2c/luatexdir/luatangle.ch
+++ b/Build/source/texk/web2c/luatexdir/luatangle.ch
@@ -53,6 +53,16 @@
\def\title{TANGLE changes for C}
@z
+@x [2] Eliminate the |end_of_TANGLE| label.
+@d end_of_TANGLE = 9999 {go here to wrap it up}
+
+@y
+@z
+@x
+label end_of_TANGLE; {go here to finish}
+@y
+@z
+
@x [?] Define and call parse_arguments.
procedure initialize;
var @<Local variables for initialization@>@/
@@ -375,6 +385,11 @@ print (banner); {print a ``banner line''}
print_ln (version_string);
@z
+@x Eliminate the |end_of_TANGLE| label.
+end_of_TANGLE:
+@y
+@z
+
@x
@<Print the job |history|@>;
@y