diff options
Diffstat (limited to 'Build/source/texk/web2c/pltotf.ch')
-rw-r--r-- | Build/source/texk/web2c/pltotf.ch | 17 |
1 files changed, 14 insertions, 3 deletions
diff --git a/Build/source/texk/web2c/pltotf.ch b/Build/source/texk/web2c/pltotf.ch index 82e6c1d9a99..c4a9a535d24 100644 --- a/Build/source/texk/web2c/pltotf.ch +++ b/Build/source/texk/web2c/pltotf.ch @@ -11,12 +11,23 @@ % 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 +\def\title{PL$\,$\lowercase{to}$\,$TF changes for C} +@z + @x [0] WEAVE: print changes only. \pageno=\contentspagenumber \advance\pageno by 1 @y \pageno=\contentspagenumber \advance\pageno by 1 \let\maybe=\iffalse -\def\title{PL$\,$\lowercase{to}$\,$TF changes for C} @z @x [1] Define my_name @@ -40,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); @@ -258,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; |