diff options
| author | Earnie Boyd <earnie@users.sf.net> | 2003-07-01 17:55:47 +0400 |
|---|---|---|
| committer | Earnie Boyd <earnie@users.sf.net> | 2003-07-01 17:55:47 +0400 |
| commit | e21a62205443574399f3786d9216bbba34980019 (patch) | |
| tree | 2d3acaeab60a9ffdb56939a58c9a5f513fb321a5 /winsup/mingw/mingwex/math | |
| parent | 6dbe0697a771aafd3ac084ddca3b19576d4f9fc8 (diff) | |
* mingwex/math/tgamma.c, tgammaf.c, tgammal.c (small):
Rename to Small (case difference).
Diffstat (limited to 'winsup/mingw/mingwex/math')
| -rw-r--r-- | winsup/mingw/mingwex/math/tgamma.c | 6 | ||||
| -rw-r--r-- | winsup/mingw/mingwex/math/tgammaf.c | 6 | ||||
| -rw-r--r-- | winsup/mingw/mingwex/math/tgammal.c | 4 |
3 files changed, 8 insertions, 8 deletions
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; |