diff options
Diffstat (limited to 'Build/source/texk/web2c/vftovp.ch')
-rw-r--r-- | Build/source/texk/web2c/vftovp.ch | 11 |
1 files changed, 8 insertions, 3 deletions
diff --git a/Build/source/texk/web2c/vftovp.ch b/Build/source/texk/web2c/vftovp.ch index bcb0020e2fb..052f8be743c 100644 --- a/Build/source/texk/web2c/vftovp.ch +++ b/Build/source/texk/web2c/vftovp.ch @@ -2,12 +2,17 @@ % Written by kb@cs.umb.edu. % This file is in the public domain. +@x [0] l.18 +\def\title{VF\lowercase{to}VP} +@y +\def\title{VF$\,$\lowercase{to}$\,$VP 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{VF$\,$\lowercase{to}$\,$VP changes for C} @z @x [1] Define my_name @@ -44,7 +49,7 @@ procedure initialize; {this procedure gets things started properly} var @!k:integer; {all-purpose index for initialization} begin print_ln(banner);@/ @y -@<Define |parse_arguments|@> +@<Define \(p)|parse_arguments|@> procedure initialize; {this procedure gets things started properly} var @!k:integer; {all-purpose index for initialization} begin @@ -541,7 +546,7 @@ Parse a Unix-style command line. @d argument_is (#) == (strcmp (long_options[option_index].name, #) = 0) -@<Define |parse_arguments|@> = +@<Define \(p)|parse_arguments|@> = procedure parse_arguments; const n_options = 4; {Pascal won't count array lengths for us.} var @!long_options: array[0..n_options] of getopt_struct; |