d0p1/ack
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages 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, string2long(register const char *nptr, char ** const endptr,
int base, int is_signed) int base, int is_signed)
{ {
register int v; register unsigned int v;
register unsigned long val = 0; register unsigned long val = 0;
register int c; register int c;
int ovfl = 0, sign = 1; int ovfl = 0, sign = 1;
@ -64,8 +64,8 @@ string2long(register const char *nptr, char ** const endptr,
else else
v = c - '0'; v = c - '0';
if (v >= base) break; if (v >= base) break;
if (val > (ULONG_MAX - v) / base) ovfl++; if (val > (ULONG_MAX - v) / base) ++ovfl;
val = (val * base) + v; else val = (val * base) + v;
} }
nptr++; nptr++;
} }
@ -76,8 +76,8 @@ string2long(register const char *nptr, char ** const endptr,
if (!ovfl) { if (!ovfl) {
/* Overflow is only possible when converting a signed long. /* Overflow is only possible when converting a signed long.
* val is unsigned long, so -LONG_MIN is converted to * The "-(LONG_MIN+1)+(unsigned long) 1" construction is there
* unsigned long. * to prevent overflow warnings on -LONG_MIN.
*/ */
if (is_signed if (is_signed
&& ( (sign < 0 && val > -(LONG_MIN+1)+(unsigned long) 1) && ( (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 LONG_MAX;
else return ULONG_MAX; else return ULONG_MAX;
} }
return (long) sign * val; return (sign * val);
} }