d0p1/ack
1
0
Fork 0
Code Issues Pull requests Packages Projects Releases Wiki Activity

Some minor changes

Browse source
This commit is contained in:
ceriel 1995-08-17 10:03:43 +00:00
parent 32bcf11ab9
commit e41c75c1bc
1 changed files with 6 additions and 6 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

12
lang/cem/libcc.ansi/stdlib/strtol.c
View file

@ -29,7 +29,7 @@ static unsigned long
string2long(register const char *nptr, char ** const endptr,
int base, int is_signed)
{
register int v;
register unsigned int v;
register unsigned long val = 0;
register int c;
int ovfl = 0, sign = 1;
@ -64,8 +64,8 @@ string2long(register const char *nptr, char ** const endptr,
else
v = c - '0';
if (v >= base) break;
if (val > (ULONG_MAX - v) / base) ovfl++;
val = (val * base) + v;
if (val > (ULONG_MAX - v) / base) ++ovfl;
else val = (val * base) + v;
}
nptr++;
}
@ -76,8 +76,8 @@ string2long(register const char *nptr, char ** const endptr,
if (!ovfl) {
/* Overflow is only possible when converting a signed long.
* val is unsigned long, so -LONG_MIN is converted to
* unsigned long.
* The "-(LONG_MIN+1)+(unsigned long) 1" construction is there
* to prevent overflow warnings on -LONG_MIN.
*/
if (is_signed
&& ( (sign < 0 && val > -(LONG_MIN+1)+(unsigned long) 1)
@ -92,5 +92,5 @@ string2long(register const char *nptr, char ** const endptr,
else return LONG_MAX;
else return ULONG_MAX;
}
return (long) sign * val;
return (sign * val);
}