pd.if.org Git - pdclib/blob - functions/wctype/iswxdigit.c

   1 /* iswxdigit( wint_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 <wctype.h>
   8 #ifndef REGTEST
   9 #include "_PDCLIB_locale.h"
  10
  11 int iswxdigit( wint_t wc )
  12 {
  13     return iswctype( wc, _PDCLIB_CTYPE_XDIGT );
  14 }
  15
  16 #endif
  17
  18 #ifdef TEST
  19 #include "_PDCLIB_test.h"
  20
  21 int main( void )
  22 {
  23     TESTCASE(iswxdigit(L'0'));
  24     TESTCASE(iswxdigit(L'1'));
  25     TESTCASE(iswxdigit(L'2'));
  26     TESTCASE(iswxdigit(L'3'));
  27     TESTCASE(iswxdigit(L'4'));
  28     TESTCASE(iswxdigit(L'5'));
  29     TESTCASE(iswxdigit(L'6'));
  30     TESTCASE(iswxdigit(L'7'));
  31     TESTCASE(iswxdigit(L'8'));
  32     TESTCASE(iswxdigit(L'9'));
  33     TESTCASE(iswxdigit(L'a'));
  34     TESTCASE(iswxdigit(L'b'));
  35     TESTCASE(iswxdigit(L'c'));
  36     TESTCASE(iswxdigit(L'd'));
  37     TESTCASE(iswxdigit(L'e'));
  38     TESTCASE(iswxdigit(L'f'));
  39     TESTCASE(iswxdigit(L'A'));
  40     TESTCASE(iswxdigit(L'B'));
  41     TESTCASE(iswxdigit(L'C'));
  42     TESTCASE(iswxdigit(L'D'));
  43     TESTCASE(iswxdigit(L'E'));
  44     TESTCASE(iswxdigit(L'F'));
  45     TESTCASE(!iswxdigit(L'g'));
  46     TESTCASE(!iswxdigit(L'G'));
  47     TESTCASE(!iswxdigit(L'x'));
  48     TESTCASE(!iswxdigit(L'X'));
  49     TESTCASE(!iswxdigit(L' '));
  50     return TEST_RESULTS;
  51 }
  52 #endif