pd.if.org Git - pdclib/blob - functions/wchar/wcspbrk.c

   1 /* wcspbrk( const wchar_t *, const wchar_t * )
   2
   3    This file is part of the Public Domain C Library (PDCLib).
   4    Permission is granted to use, modify, and / or redistribute at will.
   5 */
   6
   7 #include <wchar.h>
   8
   9 #ifndef REGTEST
  10
  11 wchar_t * wcspbrk( const wchar_t * s1, const wchar_t * s2 )
  12 {
  13     const wchar_t * p1 = s1;
  14     const wchar_t * p2;
  15     while ( *p1 )
  16     {
  17         p2 = s2;
  18         while ( *p2 )
  19         {
  20             if ( *p1 == *p2++ )
  21             {
  22                 return (wchar_t *) p1;
  23             }
  24         }
  25         ++p1;
  26     }
  27     return NULL;
  28 }
  29
  30 #endif
  31
  32 #ifdef TEST
  33 #include "_PDCLIB_test.h"
  34
  35 int main( void )
  36 {
  37     TESTCASE( wcspbrk( wabcde, L"x" ) == NULL );
  38     TESTCASE( wcspbrk( wabcde, L"xyz" ) == NULL );
  39     TESTCASE( wcspbrk( wabcdx, L"x" ) == &wabcdx[4] );
  40     TESTCASE( wcspbrk( wabcdx, L"xyz" ) == &wabcdx[4] );
  41     TESTCASE( wcspbrk( wabcdx, L"zyx" ) == &wabcdx[4] );
  42     TESTCASE( wcspbrk( wabcde, L"a" ) == &wabcde[0] );
  43     TESTCASE( wcspbrk( wabcde, L"abc" ) == &wabcde[0] );
  44     TESTCASE( wcspbrk( wabcde, L"cba" ) == &wabcde[0] );
  45     return TEST_RESULTS;
  46 }
  47 #endif