X-Git-Url: https://pd.if.org/git/?a=blobdiff_plain;f=functions%2Fstdlib%2Fstrtol.c;fp=functions%2Fstdlib%2Fstrtol.c;h=dce035ea1f9bd8a254b36ce9cde74f4e18bbcb63;hb=5bd2bbfe899293f748cd092d613340417af487f2;hp=085abbb612c074fcfcdf3595a29a216914718a9a;hpb=dce3890032b066679d21ef55d00b505f90176a8b;p=pdclib.old diff --git a/functions/stdlib/strtol.c b/functions/stdlib/strtol.c index 085abbb..dce035e 100644 --- a/functions/stdlib/strtol.c +++ b/functions/stdlib/strtol.c @@ -88,7 +88,7 @@ int main( void ) /* for one-complement and signed magnitude just as well. Anyone having */ /* a platform to test this on? */ errno = 0; -#if LONG_MAX == 0x7fffffffL +#if LONG_MAX >> 30 == 1 /* testing "even" overflow, i.e. base is power of two */ TESTCASE( strtol( "2147483647", NULL, 0 ) == 0x7fffffff ); TESTCASE( errno == 0 ); @@ -105,7 +105,7 @@ int main( void ) TESTCASE( strtol( "-2147483649", NULL, 0 ) == LONG_MIN ); TESTCASE( errno == ERANGE ); /* TODO: test "odd" overflow, i.e. base is not power of two */ -#elif LONG_MAX == 0x7fffffffffffffffL +#elif LONG_MAX >> 62 == 1 /* testing "even" overflow, i.e. base is power of two */ TESTCASE( strtol( "9223372036854775807", NULL, 0 ) == 0x7fffffffffffffff ); TESTCASE( errno == 0 );