summaryrefslogtreecommitdiff
path: root/Build/source/texk/web2c/pltotf.ch
diff options
context:
space:
mode:
Diffstat (limited to 'Build/source/texk/web2c/pltotf.ch')
-rw-r--r--Build/source/texk/web2c/pltotf.ch10
1 files changed, 8 insertions, 2 deletions
diff --git a/Build/source/texk/web2c/pltotf.ch b/Build/source/texk/web2c/pltotf.ch
index fcc08fbc5cb..c4a9a535d24 100644
--- a/Build/source/texk/web2c/pltotf.ch
+++ b/Build/source/texk/web2c/pltotf.ch
@@ -11,6 +11,12 @@
% 01/16/90 (SR) Version 3.2.
% (more recent changes in the ChangeLog)
+@x [0] l.31
+\def\(#1){} % this is used to make section names sort themselves better
+@y
+\def\({} % this is used to make section names sort themselves better
+@z
+
@x [0] l.34
\def\title{PL\lowercase{to}TF}
@y
@@ -45,7 +51,7 @@ procedure initialize; {this procedure gets things started properly}
var @<Local variables for initialization@>@/
begin print_ln(banner);@/
@y
-@<Define |parse_arguments|@>
+@<Define \(|parse_arguments|@>
procedure initialize; {this procedure gets things started properly}
var @<Local variables for initialization@>@/
begin kpse_set_program_name (argv[0], my_name);
@@ -263,7 +269,7 @@ Parse a Unix-style command line.
@d argument_is (#) == (strcmp (long_options[option_index].name, #) = 0)
-@<Define |parse_arguments|@> =
+@<Define \(|parse_arguments|@> =
procedure parse_arguments;
const n_options = 3; {Pascal won't count array lengths for us.}
var @!long_options: array[0..n_options] of getopt_struct;