newlib/libc/ctype/iswalnum_l.c

   1 /* Modified (m) 2017 Thomas Wolff: revise Unicode and locale/wchar handling */
   2 #include <_ansi.h>
   3 #include <ctype.h>
   4 #include <wctype.h>
   5 #include "local.h"
   6 #include "categories.h"
   7
   8 int
   9 iswalnum_l (wint_t c, struct __locale_t *locale)
  10 {
  11 #ifdef _MB_CAPABLE
  12   //return iswalpha (c) || iswdigit (c);
  13   c = _jp2uc_l (c, locale);
  14   enum category cat = category (c);
  15   return cat == CAT_LC || cat == CAT_Lu || cat == CAT_Ll || cat == CAT_Lt
  16       || cat == CAT_Lm || cat == CAT_Lo
  17       || cat == CAT_Nl // Letter_Number
  18       || cat == CAT_Nd // Decimal_Number
  19       ;
  20 #else
  21   return c < (wint_t)0x100 ? isalnum (c) : 0;
  22 #endif /* _MB_CAPABLE */
  23 }