mirror of
git://sourceware.org/git/newlib-cygwin.git
synced 2025-01-19 21:09:22 +08:00
Mon Apr 17 12:46:00 2000 Marek Michalkiewicz <marekm@linux.org.pl>
* libc/signal/signal.c (_signal_r) : Removed unused local variable temp. * libc/stdio/findfp.c (std): Added declaration of flags and file. * libc/stdio/mktemp.c (_gettemp, _mkstemp_r, mkstemp): Added int return type. * libc/stdio/putchar.c (putchar): Added return statement. * libc/stdio/refill.c (lflush): Added correct parentheses. * libc/stdio/vfprintf.c (_VFPRINTF_R): Ditto. * libc/stdio/vfscanf.c (__svfscanf): Changed sprintf call which prints long value to use l qualifier. * libc/stdlib/dtoa.c (_dtoa_r): Added parentheses to remove warning messages and initialized local values: ilim, ilim1, and spec_case. * libc/stdlib/ecvtbuf.c (print_e): Removed unused variable dp. * libc/stdlib/mbctype.h (_issjis1, _issjis2): Added parentheses. * libc/stdlib/mprec.c: Ditto. * libc/stdlib/setenv_r.c: Ditto. * libc/stdlib/strtod.c: Ditto. * libc/stdlib/strtol.c: Ditto. * libc/stdlib/strtoul.c: Ditto. * libm/common/sf_expm1.c: Added curly braces to if else clauses. * libm/common/sf_log1p.c: Ditto. * libm/common/sf_scalbn.c: Ditto. * libm/math/ef_log.c: Ditto.
This commit is contained in:
parent
08ce80eac2
commit
c87be3e4d6
@ -1,3 +1,28 @@
|
||||
Mon Apr 17 12:46:00 2000 Marek Michalkiewicz <marekm@linux.org.pl>
|
||||
|
||||
* libc/signal/signal.c (_signal_r) : Removed unused local variable temp.
|
||||
* libc/stdio/findfp.c (std): Added declaration of flags and file.
|
||||
* libc/stdio/mktemp.c (_gettemp, _mkstemp_r, mkstemp): Added int
|
||||
return type.
|
||||
* libc/stdio/putchar.c (putchar): Added return statement.
|
||||
* libc/stdio/refill.c (lflush): Added correct parentheses.
|
||||
* libc/stdio/vfprintf.c (_VFPRINTF_R): Ditto.
|
||||
* libc/stdio/vfscanf.c (__svfscanf): Changed sprintf call which
|
||||
prints long value to use l qualifier.
|
||||
* libc/stdlib/dtoa.c (_dtoa_r): Added parentheses to remove warning
|
||||
messages and initialized local values: ilim, ilim1, and spec_case.
|
||||
* libc/stdlib/ecvtbuf.c (print_e): Removed unused variable dp.
|
||||
* libc/stdlib/mbctype.h (_issjis1, _issjis2): Added parentheses.
|
||||
* libc/stdlib/mprec.c: Ditto.
|
||||
* libc/stdlib/setenv_r.c: Ditto.
|
||||
* libc/stdlib/strtod.c: Ditto.
|
||||
* libc/stdlib/strtol.c: Ditto.
|
||||
* libc/stdlib/strtoul.c: Ditto.
|
||||
* libm/common/sf_expm1.c: Added curly braces to if else clauses.
|
||||
* libm/common/sf_log1p.c: Ditto.
|
||||
* libm/common/sf_scalbn.c: Ditto.
|
||||
* libm/math/ef_log.c: Ditto.
|
||||
|
||||
Sun Apr 16 12:45:00 2000 Corinna Vinschen <corinna@vinschen.de>
|
||||
|
||||
* libc/posix/execvp.c (execvp): Check path for
|
||||
|
@ -144,7 +144,7 @@ _DEFUN (_signal_r, (ptr, sig, func),
|
||||
int sig _AND
|
||||
_sig_func_ptr func)
|
||||
{
|
||||
_sig_func_ptr old_func, *temp;
|
||||
_sig_func_ptr old_func;
|
||||
|
||||
if (sig < 0 || sig >= NSIG)
|
||||
{
|
||||
|
@ -26,6 +26,8 @@
|
||||
static void
|
||||
std (ptr, flags, file, data)
|
||||
FILE *ptr;
|
||||
int flags;
|
||||
int file;
|
||||
struct _reent *data;
|
||||
{
|
||||
ptr->_p = 0;
|
||||
|
@ -102,7 +102,7 @@ Supporting OS subroutines required: <<getpid>>, <<open>>, <<stat>>.
|
||||
#include <ctype.h>
|
||||
#include <reent.h>
|
||||
|
||||
static
|
||||
static int
|
||||
_DEFUN (_gettemp, (ptr, path, doopen),
|
||||
struct _reent *ptr _AND
|
||||
char *path _AND
|
||||
@ -182,6 +182,7 @@ _DEFUN (_gettemp, (ptr, path, doopen),
|
||||
/*NOTREACHED*/
|
||||
}
|
||||
|
||||
int
|
||||
_DEFUN (_mkstemp_r, (ptr, path),
|
||||
struct _reent *ptr _AND
|
||||
char *path)
|
||||
@ -201,6 +202,7 @@ _DEFUN (_mktemp_r, (ptr, path),
|
||||
|
||||
#ifndef _REENT_ONLY
|
||||
|
||||
int
|
||||
_DEFUN (mkstemp, (path),
|
||||
char *path)
|
||||
{
|
||||
|
@ -88,7 +88,7 @@ putchar (c)
|
||||
{
|
||||
/* CHECK_INIT is (eventually) called by __swbuf. */
|
||||
|
||||
_putchar_r (_REENT, c);
|
||||
return _putchar_r (_REENT, c);
|
||||
}
|
||||
|
||||
#endif
|
||||
|
@ -25,7 +25,7 @@ static int
|
||||
lflush (fp)
|
||||
FILE *fp;
|
||||
{
|
||||
if ((fp->_flags & (__SLBF | __SWR)) == __SLBF | __SWR)
|
||||
if ((fp->_flags & (__SLBF | __SWR)) == (__SLBF | __SWR))
|
||||
return fflush (fp);
|
||||
return 0;
|
||||
}
|
||||
|
@ -824,7 +824,7 @@ number: if ((dprec = prec) >= 0)
|
||||
ox[0] = *cp++;
|
||||
ox[1] = '.';
|
||||
PRINT(ox, 2);
|
||||
if (_double || flags & ALT == 0) {
|
||||
if (_double || (flags & ALT) == 0) {
|
||||
PRINT(cp, ndig-1);
|
||||
} else /* 0.[0..] */
|
||||
/* __dtoa irregularity */
|
||||
|
@ -825,7 +825,7 @@ __svfscanf (fp, fmt0, ap)
|
||||
truncate some trailing digits to make room. */
|
||||
if (exp_start >= buf + sizeof (buf) - MAX_LONG_LEN)
|
||||
exp_start = buf + sizeof (buf) - MAX_LONG_LEN - 1;
|
||||
sprintf (exp_start, "e%d", new_exp);
|
||||
sprintf (exp_start, "e%ld", new_exp);
|
||||
}
|
||||
res = atof (buf);
|
||||
if (flags & LONG)
|
||||
|
@ -291,7 +291,7 @@ _DEFUN (_dtoa_r,
|
||||
#ifdef Sudden_Underflow
|
||||
i = (int) (word0 (d) >> Exp_shift1 & (Exp_mask >> Exp_shift1));
|
||||
#else
|
||||
if (i = (int) (word0 (d) >> Exp_shift1 & (Exp_mask >> Exp_shift1)))
|
||||
if ((i = (int) (word0 (d) >> Exp_shift1 & (Exp_mask >> Exp_shift1))) != 0)
|
||||
{
|
||||
#endif
|
||||
d2.d = d.d;
|
||||
@ -337,8 +337,8 @@ _DEFUN (_dtoa_r,
|
||||
/* d is denormalized */
|
||||
|
||||
i = bbits + be + (Bias + (P - 1) - 1);
|
||||
x = i > 32 ? word0 (d) << 64 - i | word1 (d) >> i - 32
|
||||
: word1 (d) << 32 - i;
|
||||
x = (i > 32) ? (word0 (d) << (64 - i)) | (word1 (d) >> (i - 32))
|
||||
: (word1 (d) << (32 - i));
|
||||
d2.d = x;
|
||||
word0 (d2) -= 31 * Exp_msk1; /* adjust exponent */
|
||||
i -= (Bias + (P - 1) - 1) + 1;
|
||||
@ -388,11 +388,11 @@ _DEFUN (_dtoa_r,
|
||||
try_quick = 0;
|
||||
}
|
||||
leftright = 1;
|
||||
ilim = ilim1 = -1;
|
||||
switch (mode)
|
||||
{
|
||||
case 0:
|
||||
case 1:
|
||||
ilim = ilim1 = -1;
|
||||
i = 18;
|
||||
ndigits = 0;
|
||||
break;
|
||||
@ -449,7 +449,7 @@ _DEFUN (_dtoa_r,
|
||||
}
|
||||
d.d /= ds;
|
||||
}
|
||||
else if (j1 = -k)
|
||||
else if ((j1 = -k) != 0)
|
||||
{
|
||||
d.d *= tens[j1 & 0xf];
|
||||
for (j = j1 >> 4; j; j >>= 1, i++)
|
||||
@ -564,7 +564,7 @@ _DEFUN (_dtoa_r,
|
||||
if (i == ilim)
|
||||
{
|
||||
d.d += d.d;
|
||||
if (d.d > ds || d.d == ds && L & 1)
|
||||
if ((d.d > ds) || ((d.d == ds) && (L & 1)))
|
||||
{
|
||||
bump_up:
|
||||
while (*--s == '9')
|
||||
@ -640,7 +640,7 @@ _DEFUN (_dtoa_r,
|
||||
Bfree (ptr, b);
|
||||
b = b1;
|
||||
}
|
||||
if (j = b5 - m5)
|
||||
if ((j = b5 - m5) != 0)
|
||||
b = pow5mult (ptr, b, j);
|
||||
}
|
||||
else
|
||||
@ -652,6 +652,7 @@ _DEFUN (_dtoa_r,
|
||||
|
||||
/* Check for special case that d is a normalized power of 2. */
|
||||
|
||||
spec_case = 0;
|
||||
if (mode < 2)
|
||||
{
|
||||
if (!word1 (d) && !(word0 (d) & Bndry_mask)
|
||||
@ -665,8 +666,6 @@ _DEFUN (_dtoa_r,
|
||||
s2 += Log2P;
|
||||
spec_case = 1;
|
||||
}
|
||||
else
|
||||
spec_case = 0;
|
||||
}
|
||||
|
||||
/* Arrange for convenient computation of quotients:
|
||||
@ -678,10 +677,10 @@ _DEFUN (_dtoa_r,
|
||||
*/
|
||||
|
||||
#ifdef Pack_32
|
||||
if (i = ((s5 ? 32 - hi0bits (S->_x[S->_wds - 1]) : 1) + s2) & 0x1f)
|
||||
if ((i = ((s5 ? 32 - hi0bits (S->_x[S->_wds - 1]) : 1) + s2) & 0x1f) != 0)
|
||||
i = 32 - i;
|
||||
#else
|
||||
if (i = ((s5 ? 32 - hi0bits (S->_x[S->_wds - 1]) : 1) + s2) & 0xf)
|
||||
if ((i = ((s5 ? 32 - hi0bits (S->_x[S->_wds - 1]) : 1) + s2) & 0xf) != 0)
|
||||
i = 16 - i;
|
||||
#endif
|
||||
if (i > 4)
|
||||
@ -765,17 +764,17 @@ _DEFUN (_dtoa_r,
|
||||
goto ret;
|
||||
}
|
||||
#endif
|
||||
if (j < 0 || j == 0 && !mode
|
||||
if ((j < 0) || ((j == 0) && !mode
|
||||
#ifndef ROUND_BIASED
|
||||
&& !(word1 (d) & 1)
|
||||
#endif
|
||||
)
|
||||
))
|
||||
{
|
||||
if (j1 > 0)
|
||||
{
|
||||
b = lshift (ptr, b, 1);
|
||||
j1 = cmp (b, S);
|
||||
if ((j1 > 0 || j1 == 0 && dig & 1)
|
||||
if (((j1 > 0) || ((j1 == 0) && (dig & 1)))
|
||||
&& dig++ == '9')
|
||||
goto round_9_up;
|
||||
}
|
||||
@ -819,7 +818,7 @@ _DEFUN (_dtoa_r,
|
||||
|
||||
b = lshift (ptr, b, 1);
|
||||
j = cmp (b, S);
|
||||
if (j > 0 || j == 0 && dig & 1)
|
||||
if ((j > 0) || ((j == 0) && (dig & 1)))
|
||||
{
|
||||
roundoff:
|
||||
while (*--s == '9')
|
||||
|
@ -151,7 +151,6 @@ _DEFUN (print_e, (ptr, buf, invalue, width, type, dot),
|
||||
char type _AND
|
||||
int dot)
|
||||
{
|
||||
int dp;
|
||||
int sign;
|
||||
char *end;
|
||||
char *p;
|
||||
|
@ -12,8 +12,8 @@ int _EXFUN(_issjis2, (int c));
|
||||
int _EXFUN(_iseucjp, (int c));
|
||||
int _EXFUN(_isjis, (int c));
|
||||
|
||||
#define _issjis1(c) ((c) >= 0x81 && (c) <= 0x9f || (c) >= 0xe0 && (c) <= 0xef)
|
||||
#define _issjis2(c) ((c) >= 0x40 && (c) <= 0x7e || (c) >= 0x80 && (c) <= 0xfc)
|
||||
#define _issjis1(c) (((c) >= 0x81 && (c) <= 0x9f) || ((c) >= 0xe0 && (c) <= 0xef))
|
||||
#define _issjis2(c) (((c) >= 0x40 && (c) <= 0x7e) || ((c) >= 0x80 && (c) <= 0xfc))
|
||||
#define _iseucjp(c) ((c) >= 0xa1 && (c) <= 0xfe)
|
||||
#define _isjis(c) ((c) >= 0x21 && (c) <= 0x7e)
|
||||
|
||||
|
@ -107,7 +107,7 @@ _DEFUN (Balloc, (ptr, k), struct _reent *ptr _AND int k)
|
||||
}
|
||||
}
|
||||
|
||||
if (rv = ptr->_freelist[k])
|
||||
if ((rv = ptr->_freelist[k]) != 0)
|
||||
{
|
||||
ptr->_freelist[k] = rv->_next;
|
||||
}
|
||||
@ -354,7 +354,7 @@ _DEFUN (mult, (ptr, a, b), struct _reent * ptr _AND _Bigint * a _AND _Bigint * b
|
||||
#ifdef Pack_32
|
||||
for (; xb < xbe; xb++, xc0++)
|
||||
{
|
||||
if (y = *xb & 0xffff)
|
||||
if ((y = *xb & 0xffff) != 0)
|
||||
{
|
||||
x = xa;
|
||||
xc = xc0;
|
||||
@ -370,7 +370,7 @@ _DEFUN (mult, (ptr, a, b), struct _reent * ptr _AND _Bigint * a _AND _Bigint * b
|
||||
while (x < xae);
|
||||
*xc = carry;
|
||||
}
|
||||
if (y = *xb >> 16)
|
||||
if ((y = *xb >> 16) != 0)
|
||||
{
|
||||
x = xa;
|
||||
xc = xc0;
|
||||
@ -420,7 +420,7 @@ _DEFUN (pow5mult,
|
||||
int i;
|
||||
static _CONST int p05[3] = {5, 25, 125};
|
||||
|
||||
if (i = k & 3)
|
||||
if ((i = k & 3) != 0)
|
||||
b = multadd (ptr, b, p05[i - 1], 0);
|
||||
|
||||
if (!(k >>= 2))
|
||||
@ -484,7 +484,7 @@ _DEFUN (lshift, (ptr, b, k), struct _reent * ptr _AND _Bigint * b _AND int k)
|
||||
z = *x++ >> k1;
|
||||
}
|
||||
while (x < xe);
|
||||
if (*x1 = z)
|
||||
if ((*x1 = z) != 0)
|
||||
++n1;
|
||||
}
|
||||
#else
|
||||
@ -697,17 +697,17 @@ _DEFUN (b2d, (a, e),
|
||||
#ifdef Pack_32
|
||||
if (k < Ebits)
|
||||
{
|
||||
d0 = Exp_1 | y >> Ebits - k;
|
||||
d0 = Exp_1 | y >> (Ebits - k);
|
||||
w = xa > xa0 ? *--xa : 0;
|
||||
#ifndef _DOUBLE_IS_32BITS
|
||||
d1 = y << (32 - Ebits) + k | w >> Ebits - k;
|
||||
d1 = y << ((32 - Ebits) + k) | w >> (Ebits - k);
|
||||
#endif
|
||||
goto ret_d;
|
||||
}
|
||||
z = xa > xa0 ? *--xa : 0;
|
||||
if (k -= Ebits)
|
||||
{
|
||||
d0 = Exp_1 | y << k | z >> 32 - k;
|
||||
d0 = Exp_1 | y << k | z >> (32 - k);
|
||||
y = xa > xa0 ? *--xa : 0;
|
||||
#ifndef _DOUBLE_IS_32BITS
|
||||
d1 = z << k | y >> 32 - k;
|
||||
@ -789,7 +789,7 @@ _DEFUN (d2b,
|
||||
z |= Exp_msk11;
|
||||
#endif
|
||||
#else
|
||||
if (de = (int) (d0 >> Exp_shift))
|
||||
if ((de = (int) (d0 >> Exp_shift)) != 0)
|
||||
z |= Exp_msk1;
|
||||
#endif
|
||||
#ifdef Pack_32
|
||||
|
@ -64,7 +64,7 @@ _DEFUN (_setenv_r, (reent_ptr, name, value, rewrite),
|
||||
}
|
||||
if (strlen (C) >= l_value)
|
||||
{ /* old larger; copy over */
|
||||
while (*C++ = *value++);
|
||||
while ((*C++ = *value++) != 0);
|
||||
ENV_UNLOCK;
|
||||
return 0;
|
||||
}
|
||||
@ -108,7 +108,7 @@ _DEFUN (_setenv_r, (reent_ptr, name, value, rewrite),
|
||||
return -1;
|
||||
}
|
||||
for (C = environ[offset]; (*C = *name++) && *C != '='; ++C);
|
||||
for (*C++ = '='; *C++ = *value++;);
|
||||
for (*C++ = '='; (*C++ = *value++) != 0;);
|
||||
|
||||
ENV_UNLOCK;
|
||||
|
||||
|
@ -316,7 +316,7 @@ dig_done:
|
||||
|
||||
if (e1 > 0)
|
||||
{
|
||||
if (i = e1 & 15)
|
||||
if ((i = e1 & 15) != 0)
|
||||
rv.d *= tens[i];
|
||||
if (e1 &= ~15)
|
||||
{
|
||||
@ -373,7 +373,7 @@ dig_done:
|
||||
else if (e1 < 0)
|
||||
{
|
||||
e1 = -e1;
|
||||
if (i = e1 & 15)
|
||||
if ((i = e1 & 15) != 0)
|
||||
rv.d /= tens[i];
|
||||
if (e1 &= ~15)
|
||||
{
|
||||
|
@ -194,7 +194,7 @@ _DEFUN (_strtol_r, (rptr, nptr, endptr, base),
|
||||
break;
|
||||
if (c >= base)
|
||||
break;
|
||||
if (any < 0 || acc > cutoff || acc == cutoff && c > cutlim)
|
||||
if (any < 0 || acc > cutoff || (acc == cutoff && c > cutlim))
|
||||
any = -1;
|
||||
else {
|
||||
any = 1;
|
||||
|
@ -174,7 +174,7 @@ _DEFUN (_strtoul_r, (rptr, nptr, endptr, base),
|
||||
break;
|
||||
if (c >= base)
|
||||
break;
|
||||
if (any < 0 || acc > cutoff || acc == cutoff && c > cutlim)
|
||||
if (any < 0 || acc > cutoff || (acc == cutoff && c > cutlim))
|
||||
any = -1;
|
||||
else {
|
||||
any = 1;
|
||||
|
@ -102,9 +102,10 @@ Q5 = -2.0109921195e-07; /* 0xb457edbb */
|
||||
e = (x*(e-c)-c);
|
||||
e -= hxs;
|
||||
if(k== -1) return (float)0.5*(x-e)-(float)0.5;
|
||||
if(k==1)
|
||||
if(k==1) {
|
||||
if(x < (float)-0.25) return -(float)2.0*(e-(x+(float)0.5));
|
||||
else return one+(float)2.0*(x-e);
|
||||
}
|
||||
if (k <= -2 || k>56) { /* suffice to return exp(x)-1 */
|
||||
__int32_t i;
|
||||
y = one-(e-x);
|
||||
|
@ -93,8 +93,8 @@ static float zero = 0.0;
|
||||
}
|
||||
hfsq=(float)0.5*f*f;
|
||||
if(hu==0) { /* |f| < 2**-20 */
|
||||
if(f==zero) if(k==0) return zero;
|
||||
else {c += k*ln2_lo; return k*ln2_hi+c;}
|
||||
if(f==zero) { if(k==0) return zero;
|
||||
else {c += k*ln2_lo; return k*ln2_hi+c;}}
|
||||
R = hfsq*((float)1.0-(float)0.66666666666666666*f);
|
||||
if(k==0) return f-R; else
|
||||
return k*ln2_hi-((R-(k*ln2_lo+c))-f);
|
||||
|
@ -54,10 +54,11 @@ tiny = 1.0e-30;
|
||||
if (k > 0xfe) return huge*copysignf(huge,x); /* overflow */
|
||||
if (k > 0) /* normal result */
|
||||
{SET_FLOAT_WORD(x,(ix&0x807fffff)|(k<<23)); return x;}
|
||||
if (k <= -25)
|
||||
if (k <= -25) {
|
||||
if (n > OVERFLOW_INT) /* in case integer overflow in n+k */
|
||||
return huge*copysignf(huge,x); /*overflow*/
|
||||
else return tiny*copysignf(tiny,x); /*underflow*/
|
||||
}
|
||||
k += 25; /* subnormal result */
|
||||
SET_FLOAT_WORD(x,(ix&0x807fffff)|(k<<23));
|
||||
return x*twom25;
|
||||
|
@ -65,8 +65,8 @@ static float zero = 0.0;
|
||||
k += (i>>23);
|
||||
f = x-(float)1.0;
|
||||
if((0x007fffff&(15+ix))<16) { /* |f| < 2**-20 */
|
||||
if(f==zero) if(k==0) return zero; else {dk=(float)k;
|
||||
return dk*ln2_hi+dk*ln2_lo;}
|
||||
if(f==zero) { if(k==0) return zero; else {dk=(float)k;
|
||||
return dk*ln2_hi+dk*ln2_lo;}}
|
||||
R = f*f*((float)0.5-(float)0.33333333333333333*f);
|
||||
if(k==0) return f-R; else {dk=(float)k;
|
||||
return dk*ln2_hi-((R-dk*ln2_lo)-f);}
|
||||
|
Loading…
x
Reference in New Issue
Block a user