[packages/perl-Math-BigInteger.git] / perl-Math-BigInteger-Fputc_to_fputc.patch

--- bn.c.orig	2004-04-27 10:49:28.912658328 +0200
+++ bn.c	2004-04-27 10:48:33.718049184 +0200
@@ -304,8 +304,8 @@
 	int i,j,v,z=0;
 	static char *hex="0123456789ABCDEF";
 
-	if (a->neg) Fputc('-',fp);
-	if (a->top == 0) Fputc('0',fp);
+	if (a->neg) fputc('-',fp);
+	if (a->top == 0) fputc('0',fp);
 	for (i=a->top-1; i >=0; i--)
 		{
 		for (j=BITS2-4; j >= 0; j-=4)
@@ -314,7 +314,7 @@
 			v=(a->d[i]>>j)&0x0f;
 			if (z || (v != 0))
 				{
-				Fputc(hex[v],fp);
+				fputc(hex[v],fp);
 				z=1;
 				}
 			}
Commit	Line	Data
798197a4	1	--- bn.c.orig 2004-04-27 10:49:28.912658328 +0200
	2	+++ bn.c 2004-04-27 10:48:33.718049184 +0200
	3	@@ -304,8 +304,8 @@
	4	int i,j,v,z=0;
	5	static char *hex="0123456789ABCDEF";
	6
	7	- if (a->neg) Fputc('-',fp);
	8	- if (a->top == 0) Fputc('0',fp);
	9	+ if (a->neg) fputc('-',fp);
	10	+ if (a->top == 0) fputc('0',fp);
	11	for (i=a->top-1; i >=0; i--)
	12	{
	13	for (j=BITS2-4; j >= 0; j-=4)
	14	@@ -314,7 +314,7 @@
	15	v=(a->d[i]>>j)&0x0f;
	16	if (z \|\| (v != 0))
	17	{
	18	- Fputc(hex[v],fp);
	19	+ fputc(hex[v],fp);
	20	z=1;
	21	}
	22	}