X-Git-Url: https://pd.if.org/git/?a=blobdiff_plain;f=functions%2F_PDCLIB%2Fstrtox_prelim.c;h=6e16b35d17f41c36528ae3b1bc773fbbac13cfbf;hb=d865c4403fc91d1f1ac95ba76febcee9f429bb97;hp=69255278ac80eb70eb8ead79fbbcd0c26101da49;hpb=d02f38605b53cdff5460cc6b9e1b2a80c3a2ba4c;p=pdclib diff --git a/functions/_PDCLIB/strtox_prelim.c b/functions/_PDCLIB/strtox_prelim.c index 6925527..6e16b35 100644 --- a/functions/_PDCLIB/strtox_prelim.c +++ b/functions/_PDCLIB/strtox_prelim.c @@ -1,7 +1,3 @@ -/* $Id$ */ - -/* Release $Name$ */ - /* _PDCLIB_strtox_prelim( const char *, char *, int * ) This file is part of the Public Domain C Library (PDCLib). @@ -9,6 +5,10 @@ */ #include +#include +#include + +#ifndef REGTEST const char * _PDCLIB_strtox_prelim( const char * p, char * sign, int * base ) { @@ -25,6 +25,15 @@ const char * _PDCLIB_strtox_prelim( const char * p, char * sign, int * base ) { *base = 16; ++p; + /* catching a border case here: "0x" followed by a non-digit should + be parsed as the unprefixed zero. + We have to "rewind" the parsing; having the base set to 16 if it + was zero previously does not hurt, as the result is zero anyway. + */ + if ( memchr( _PDCLIB_digits, tolower(*p), *base ) == NULL ) + { + p -= 2; + } } else if ( *base == 0 ) { @@ -42,11 +51,15 @@ const char * _PDCLIB_strtox_prelim( const char * p, char * sign, int * base ) return ( ( *base >= 2 ) && ( *base <= 36 ) ) ? p : NULL; } +#endif + #ifdef TEST -#include <_PDCLIB_test.h> + +#include "_PDCLIB_test.h" int main( void ) { +#ifndef REGTEST int base = 0; char sign = '\0'; char test1[] = " 123"; @@ -74,6 +87,7 @@ int main( void ) TESTCASE( _PDCLIB_strtox_prelim( test3, &sign, &base ) == NULL ); base = 37; TESTCASE( _PDCLIB_strtox_prelim( test3, &sign, &base ) == NULL ); +#endif return TEST_RESULTS; }