devel/texlive/texlive-2007-ptex-3.1.10.patch

--- ptex-src-3.1.10/jbibtex.ch.orig	2006-05-29 11:27:25.000000000 +0900
+++ ptex-src-3.1.10/jbibtex.ch	2007-03-02 19:00:49.000000000 +0900
@@ -1504,7 +1504,7 @@
     end; {Else it was a flag; |getopt| has already done the assignment.}
   until getopt_return_val = -1;
   if (version_switch) then
-    print_version_and_exit (banner, 'Oren Patashnik', nil);
+    print_version_and_exit (banner, 'Oren Patashnik', nil, nil);
 
   {Now |optind| is the index of first non-option on the command line.
    We must have one remaining argument.}
--- ptex-src-3.1.10/pdvitype.ch.orig	2005-03-07 15:30:44.000000000 +0900
+++ ptex-src-3.1.10/pdvitype.ch	2007-03-02 19:00:11.000000000 +0900
@@ -1021,7 +1021,7 @@
       usage_help (PDVITYPE_HELP, nil);
 
     end else if argument_is ('version') then begin
-      print_version_and_exit (banner, nil, 'D.E. Knuth');
+      print_version_and_exit (banner, nil, 'D.E. Knuth', nil);
     
     end else if argument_is ('output-level') then begin
       out_mode := atou (optarg);
--- ptex-src-3.1.10/pltotf.ch.orig	2006-07-18 17:03:33.000000000 +0900
+++ ptex-src-3.1.10/pltotf.ch	2007-03-02 18:59:39.000000000 +0900
@@ -427,7 +427,7 @@
 @z
 @x
     end else if argument_is ('version') then begin
-      print_version_and_exit (banner, nil, 'D.E. Knuth');
+      print_version_and_exit (banner, nil, 'D.E. Knuth', nil);
 
     end; {Else it was a flag; |getopt| has already done the assignment.}
   until getopt_return_val = -1;
@@ -441,7 +441,7 @@
     end; {Else it was a flag; |getopt| has already done the assignment.}
   until getopt_return_val = -1;
   if (version_switch) then
-    print_version_and_exit (banner, nil, 'D.E. Knuth');
+    print_version_and_exit (banner, nil, 'D.E. Knuth', nil);
 @z
 
 @x
--- ptex-src-3.1.10/ptexextra.c.orig	2006-05-29 11:27:25.000000000 +0900
+++ ptex-src-3.1.10/ptexextra.c	2007-03-02 14:48:05.000000000 +0900
@@ -953,7 +953,7 @@
     } /* Else it was a flag; getopt has already done the assignment.  */
   }
   if (version_switch) {
-    printversionandexit (BANNER, COPYRIGHT_HOLDER, AUTHOR);
+    printversionandexit (BANNER, COPYRIGHT_HOLDER, AUTHOR, nil);
   }
 }
 
@@ -1718,7 +1718,7 @@
 }
 
 strnumber
-getjobname()
+getjobname(strnumber curname)
 {
     strnumber ret = curname;
     if (job_name != NULL)
--- ptex-src-3.1.10/tftopl.ch.orig	2006-07-18 17:03:33.000000000 +0900
+++ ptex-src-3.1.10/tftopl.ch	2007-03-02 18:58:41.000000000 +0900
@@ -374,7 +374,7 @@
 @z
 @x
     end else if argument_is ('version') then begin
-      print_version_and_exit (banner, nil, 'D.E. Knuth');
+      print_version_and_exit (banner, nil, 'D.E. Knuth', nil);
 @y
     end else if argument_is ('version') then begin
       version_switch := true;
@@ -389,7 +389,7 @@
     end; {Else it was a flag; |getopt| has already done the assignment.}
   until getopt_return_val = -1;
   if (version_switch) then
-    print_version_and_exit (banner, nil, 'D.E. Knuth');
+    print_version_and_exit (banner, nil, 'D.E. Knuth', nil);
 @z
 
 @x
--- ptex-src-3.1.10/version.c.orig	2006-05-29 11:27:25.000000000 +0900
+++ ptex-src-3.1.10/version.c	2007-03-02 15:38:03.000000000 +0900
@@ -3,8 +3,9 @@
 
 /*** lib/printversion.c:  Output for the option --version. ***/
 void
-printversionandexit P3C(const_string, banner,
-                        const_string, copyright_holder,  const_string, author)
+printversionandexit P4C(const_string,  banner,
+                        const_string, copyright_holder,  const_string, author,
+                        char*, extra_info)
 {
   extern string versionstring;  /* from web2c/lib/version.c */
   extern string based_prog_name;
1	--- ptex-src-3.1.10/jbibtex.ch.orig 2006-05-29 11:27:25.000000000 +0900
2	+++ ptex-src-3.1.10/jbibtex.ch 2007-03-02 19:00:49.000000000 +0900
3	@@ -1504,7 +1504,7 @@
4	end; {Else it was a flag; \|getopt\| has already done the assignment.}
5	until getopt_return_val = -1;
6	if (version_switch) then
7	- print_version_and_exit (banner, 'Oren Patashnik', nil);
8	+ print_version_and_exit (banner, 'Oren Patashnik', nil, nil);
9
10	{Now \|optind\| is the index of first non-option on the command line.
11	We must have one remaining argument.}
12	--- ptex-src-3.1.10/pdvitype.ch.orig 2005-03-07 15:30:44.000000000 +0900
13	+++ ptex-src-3.1.10/pdvitype.ch 2007-03-02 19:00:11.000000000 +0900
14	@@ -1021,7 +1021,7 @@
15	usage_help (PDVITYPE_HELP, nil);
16
17	end else if argument_is ('version') then begin
18	- print_version_and_exit (banner, nil, 'D.E. Knuth');
19	+ print_version_and_exit (banner, nil, 'D.E. Knuth', nil);
20
21	end else if argument_is ('output-level') then begin
22	out_mode := atou (optarg);
23	--- ptex-src-3.1.10/pltotf.ch.orig 2006-07-18 17:03:33.000000000 +0900
24	+++ ptex-src-3.1.10/pltotf.ch 2007-03-02 18:59:39.000000000 +0900
25	@@ -427,7 +427,7 @@
26	@z
27	@x
28	end else if argument_is ('version') then begin
29	- print_version_and_exit (banner, nil, 'D.E. Knuth');
30	+ print_version_and_exit (banner, nil, 'D.E. Knuth', nil);
31
32	end; {Else it was a flag; \|getopt\| has already done the assignment.}
33	until getopt_return_val = -1;
34	@@ -441,7 +441,7 @@
35	end; {Else it was a flag; \|getopt\| has already done the assignment.}
36	until getopt_return_val = -1;
37	if (version_switch) then
38	- print_version_and_exit (banner, nil, 'D.E. Knuth');
39	+ print_version_and_exit (banner, nil, 'D.E. Knuth', nil);
40	@z
41
42	@x
43	--- ptex-src-3.1.10/ptexextra.c.orig 2006-05-29 11:27:25.000000000 +0900
44	+++ ptex-src-3.1.10/ptexextra.c 2007-03-02 14:48:05.000000000 +0900
45	@@ -953,7 +953,7 @@
46	} /* Else it was a flag; getopt has already done the assignment. */
47	}
48	if (version_switch) {
49	- printversionandexit (BANNER, COPYRIGHT_HOLDER, AUTHOR);
50	+ printversionandexit (BANNER, COPYRIGHT_HOLDER, AUTHOR, nil);
51	}
52	}
53
54	@@ -1718,7 +1718,7 @@
55	}
56
57	strnumber
58	-getjobname()
59	+getjobname(strnumber curname)
60	{
61	strnumber ret = curname;
62	if (job_name != NULL)
63	--- ptex-src-3.1.10/tftopl.ch.orig 2006-07-18 17:03:33.000000000 +0900
64	+++ ptex-src-3.1.10/tftopl.ch 2007-03-02 18:58:41.000000000 +0900
65	@@ -374,7 +374,7 @@
66	@z
67	@x
68	end else if argument_is ('version') then begin
69	- print_version_and_exit (banner, nil, 'D.E. Knuth');
70	+ print_version_and_exit (banner, nil, 'D.E. Knuth', nil);
71	@y
72	end else if argument_is ('version') then begin
73	version_switch := true;
74	@@ -389,7 +389,7 @@
75	end; {Else it was a flag; \|getopt\| has already done the assignment.}
76	until getopt_return_val = -1;
77	if (version_switch) then
78	- print_version_and_exit (banner, nil, 'D.E. Knuth');
79	+ print_version_and_exit (banner, nil, 'D.E. Knuth', nil);
80	@z
81
82	@x
83	--- ptex-src-3.1.10/version.c.orig 2006-05-29 11:27:25.000000000 +0900
84	+++ ptex-src-3.1.10/version.c 2007-03-02 15:38:03.000000000 +0900
85	@@ -3,8 +3,9 @@
86
87	/* lib/printversion.c: Output for the option --version. */
88	void
89	-printversionandexit P3C(const_string, banner,
90	- const_string, copyright_holder, const_string, author)
91	+printversionandexit P4C(const_string, banner,
92	+ const_string, copyright_holder, const_string, author,
93	+ char*, extra_info)
94	{
95	extern string versionstring; /* from web2c/lib/version.c */
96	extern string based_prog_name;
admin@fedoraproject.org	ViewVC Help
Powered by ViewVC 1.1.2