From e21a62205443574399f3786d9216bbba34980019 Mon Sep 17 00:00:00 2001
From: Earnie Boyd <earnie@users.sf.net>
Date: Tue, 1 Jul 2003 13:55:47 +0000
Subject: [PATCH] 	* mingwex/math/tgamma.c, tgammaf.c, tgammal.c (small):
 	Rename to Small (case difference).

---
 winsup/mingw/ChangeLog              | 2 ++
 winsup/mingw/mingwex/math/tgamma.c  | 6 +++---
 winsup/mingw/mingwex/math/tgammaf.c | 6 +++---
 winsup/mingw/mingwex/math/tgammal.c | 4 ++--
 4 files changed, 10 insertions(+), 8 deletions(-)

diff --git a/winsup/mingw/ChangeLog b/winsup/mingw/ChangeLog
index 716a8e7ca..5b01c255a 100644
--- a/winsup/mingw/ChangeLog
+++ b/winsup/mingw/ChangeLog
@@ -2,6 +2,8 @@
 
 	* include/_mingw.h (__int32, __int16, __int8, small, hyper): Define.
 	Note: Also added to w32api/include/basetyps.h.
+	* mingwex/math/tgamma.c, tgammaf.c, tgammal.c (small): 
+	Rename to Small (case difference).
 
 2003-06-18  Earnie Boyd  <earnie@users.sf.net>
 
diff --git a/winsup/mingw/mingwex/math/tgamma.c b/winsup/mingw/mingwex/math/tgamma.c
index c3912a890..d04a5f4a5 100644
--- a/winsup/mingw/mingwex/math/tgamma.c
+++ b/winsup/mingw/mingwex/math/tgamma.c
@@ -346,7 +346,7 @@ while( x >= 3.0 )
 while( x < 0.0 )
 	{
 	if( x > -1.E-9 )
-		goto small;
+		goto Small;
 	z /= x;
 	x += 1.0;
 	}
@@ -354,7 +354,7 @@ while( x < 0.0 )
 while( x < 2.0 )
 	{
 	if( x < 1.e-9 )
-		goto small;
+		goto Small;
 	z /= x;
 	x += 1.0;
 	}
@@ -367,7 +367,7 @@ p = polevl( x, P, 6 );
 q = polevl( x, Q, 7 );
 return( z * p / q );
 
-small:
+Small:
 if( x == 0.0 )
 	{
 	goto gsing;
diff --git a/winsup/mingw/mingwex/math/tgammaf.c b/winsup/mingw/mingwex/math/tgammaf.c
index 38e7d75a1..07d294971 100644
--- a/winsup/mingw/mingwex/math/tgammaf.c
+++ b/winsup/mingw/mingwex/math/tgammaf.c
@@ -214,7 +214,7 @@ while( x >= 3.0 )
 while( x < 0.0 )
 	{
 	if( x > -1.E-4 )
-		goto small;
+		goto Small;
 	z *=x;
 	x += 1.0;
 	}
@@ -222,7 +222,7 @@ while( x < 0.0 )
 while( x < 2.0 )
 	{
 	if( x < 1.e-4 )
-		goto small;
+		goto Small;
 	z *=x;
 	x += 1.0;
 	}
@@ -244,7 +244,7 @@ if( negative )
 	}
 return(p);
 
-small:
+Small:
 if( x == 0.0 )
 	{
 	goto gsing;
diff --git a/winsup/mingw/mingwex/math/tgammal.c b/winsup/mingw/mingwex/math/tgammal.c
index f3fcdd6d5..6db4e3af7 100644
--- a/winsup/mingw/mingwex/math/tgammal.c
+++ b/winsup/mingw/mingwex/math/tgammal.c
@@ -456,7 +456,7 @@ while( x < -0.03125L )
 	}
 
 if( x <= 0.03125L )
-	goto small;
+	goto Small;
 
 while( x < 2.0L )
 	{
@@ -472,7 +472,7 @@ p = polevll( x, P, 7 );
 q = polevll( x, Q, 8 );
 return( z * p / q );
 
-small:
+Small:
 if( x == 0.0L )
 	{
 	goto gsing;