|
 |
4931932 |
--- ptex-src-3.1.10/jbibtex.ch.orig 2006-05-29 11:27:25.000000000 +0900
|
|
|
4931932 |
+++ ptex-src-3.1.10/jbibtex.ch 2007-03-02 19:00:49.000000000 +0900
|
|
|
4931932 |
@@ -1504,7 +1504,7 @@
|
|
|
4931932 |
end; {Else it was a flag; |getopt| has already done the assignment.}
|
|
|
4931932 |
until getopt_return_val = -1;
|
|
|
4931932 |
if (version_switch) then
|
|
|
4931932 |
- print_version_and_exit (banner, 'Oren Patashnik', nil);
|
|
|
4931932 |
+ print_version_and_exit (banner, 'Oren Patashnik', nil, nil);
|
|
|
4931932 |
|
|
|
4931932 |
{Now |optind| is the index of first non-option on the command line.
|
|
|
4931932 |
We must have one remaining argument.}
|
|
|
4931932 |
--- ptex-src-3.1.10/pdvitype.ch.orig 2005-03-07 15:30:44.000000000 +0900
|
|
|
4931932 |
+++ ptex-src-3.1.10/pdvitype.ch 2007-03-02 19:00:11.000000000 +0900
|
|
|
4931932 |
@@ -1021,7 +1021,7 @@
|
|
|
4931932 |
usage_help (PDVITYPE_HELP, nil);
|
|
|
4931932 |
|
|
|
4931932 |
end else if argument_is ('version') then begin
|
|
|
4931932 |
- print_version_and_exit (banner, nil, 'D.E. Knuth');
|
|
|
4931932 |
+ print_version_and_exit (banner, nil, 'D.E. Knuth', nil);
|
|
|
4931932 |
|
|
|
4931932 |
end else if argument_is ('output-level') then begin
|
|
|
4931932 |
out_mode := atou (optarg);
|
|
|
4931932 |
--- ptex-src-3.1.10/pltotf.ch.orig 2006-07-18 17:03:33.000000000 +0900
|
|
|
4931932 |
+++ ptex-src-3.1.10/pltotf.ch 2007-03-02 18:59:39.000000000 +0900
|
|
|
4931932 |
@@ -427,7 +427,7 @@
|
|
|
4931932 |
@z
|
|
|
4931932 |
@x
|
|
|
4931932 |
end else if argument_is ('version') then begin
|
|
|
4931932 |
- print_version_and_exit (banner, nil, 'D.E. Knuth');
|
|
|
4931932 |
+ print_version_and_exit (banner, nil, 'D.E. Knuth', nil);
|
|
|
4931932 |
|
|
|
4931932 |
end; {Else it was a flag; |getopt| has already done the assignment.}
|
|
|
4931932 |
until getopt_return_val = -1;
|
|
|
4931932 |
@@ -441,7 +441,7 @@
|
|
|
4931932 |
end; {Else it was a flag; |getopt| has already done the assignment.}
|
|
|
4931932 |
until getopt_return_val = -1;
|
|
|
4931932 |
if (version_switch) then
|
|
|
4931932 |
- print_version_and_exit (banner, nil, 'D.E. Knuth');
|
|
|
4931932 |
+ print_version_and_exit (banner, nil, 'D.E. Knuth', nil);
|
|
|
4931932 |
@z
|
|
|
4931932 |
|
|
|
4931932 |
@x
|
|
|
4931932 |
--- ptex-src-3.1.10/ptexextra.c.orig 2006-05-29 11:27:25.000000000 +0900
|
|
|
4931932 |
+++ ptex-src-3.1.10/ptexextra.c 2007-03-02 14:48:05.000000000 +0900
|
|
|
4931932 |
@@ -953,7 +953,7 @@
|
|
|
4931932 |
} /* Else it was a flag; getopt has already done the assignment. */
|
|
|
4931932 |
}
|
|
|
4931932 |
if (version_switch) {
|
|
|
4931932 |
- printversionandexit (BANNER, COPYRIGHT_HOLDER, AUTHOR);
|
|
|
4931932 |
+ printversionandexit (BANNER, COPYRIGHT_HOLDER, AUTHOR, nil);
|
|
|
4931932 |
}
|
|
|
4931932 |
}
|
|
|
4931932 |
|
|
|
4931932 |
@@ -1718,7 +1718,7 @@
|
|
|
4931932 |
}
|
|
|
4931932 |
|
|
|
4931932 |
strnumber
|
|
|
4931932 |
-getjobname()
|
|
|
4931932 |
+getjobname(strnumber curname)
|
|
|
4931932 |
{
|
|
|
4931932 |
strnumber ret = curname;
|
|
|
4931932 |
if (job_name != NULL)
|
|
|
4931932 |
--- ptex-src-3.1.10/tftopl.ch.orig 2006-07-18 17:03:33.000000000 +0900
|
|
|
4931932 |
+++ ptex-src-3.1.10/tftopl.ch 2007-03-02 18:58:41.000000000 +0900
|
|
|
4931932 |
@@ -374,7 +374,7 @@
|
|
|
4931932 |
@z
|
|
|
4931932 |
@x
|
|
|
4931932 |
end else if argument_is ('version') then begin
|
|
|
4931932 |
- print_version_and_exit (banner, nil, 'D.E. Knuth');
|
|
|
4931932 |
+ print_version_and_exit (banner, nil, 'D.E. Knuth', nil);
|
|
|
4931932 |
@y
|
|
|
4931932 |
end else if argument_is ('version') then begin
|
|
|
4931932 |
version_switch := true;
|
|
|
4931932 |
@@ -389,7 +389,7 @@
|
|
|
4931932 |
end; {Else it was a flag; |getopt| has already done the assignment.}
|
|
|
4931932 |
until getopt_return_val = -1;
|
|
|
4931932 |
if (version_switch) then
|
|
|
4931932 |
- print_version_and_exit (banner, nil, 'D.E. Knuth');
|
|
|
4931932 |
+ print_version_and_exit (banner, nil, 'D.E. Knuth', nil);
|
|
|
4931932 |
@z
|
|
|
4931932 |
|
|
|
4931932 |
@x
|
|
|
4931932 |
--- ptex-src-3.1.10/version.c.orig 2006-05-29 11:27:25.000000000 +0900
|
|
|
4931932 |
+++ ptex-src-3.1.10/version.c 2007-03-02 15:38:03.000000000 +0900
|
|
|
4931932 |
@@ -3,8 +3,9 @@
|
|
|
4931932 |
|
|
|
4931932 |
/*** lib/printversion.c: Output for the option --version. ***/
|
|
|
4931932 |
void
|
|
|
4931932 |
-printversionandexit P3C(const_string, banner,
|
|
|
4931932 |
- const_string, copyright_holder, const_string, author)
|
|
|
4931932 |
+printversionandexit P4C(const_string, banner,
|
|
|
4931932 |
+ const_string, copyright_holder, const_string, author,
|
|
|
4931932 |
+ char*, extra_info)
|
|
|
4931932 |
{
|
|
|
4931932 |
extern string versionstring; /* from web2c/lib/version.c */
|
|
|
4931932 |
extern string based_prog_name;
|