source: asp3_tinet_ecnl_arm/trunk/musl-1.1.18/src/ctype/iswalpha.c@ 352

Last change on this file since 352 was 352, checked in by coas-nagasima, 6 years ago

arm向けASP3版ECNLを追加
  • Property svn:eol-style set to native
  • Property svn:mime-type set to text/x-csrc;charset=UTF-8
File size: 351 bytes
Line 
1#include <wctype.h>
2#include "libc.h"
3
4static const unsigned char table[] = {
5#include "alpha.h"
6};
7
8int iswalpha(wint_t wc)
9{
10 if (wc<0x20000U)
11 return (table[table[wc>>8]*32+((wc&255)>>3)]>>(wc&7))&1;
12 if (wc<0x2fffeU)
13 return 1;
14 return 0;
15}
16
17int __iswalpha_l(wint_t c, locale_t l)
18{
19 return iswalpha(c);
20}
21
22weak_alias(__iswalpha_l, iswalpha_l);
Note: See TracBrowser for help on using the repository browser.