// S : tags libc c // S : expect --result valid // S : cc -o test.bc -D_PDCLIB_BUILD -DTEST $file // S : verify -o nofail:malloc test.bc #include #include "_PDCLIB_test.h" int main( void ) { TESTCASE(iswdigit(L'0')); TESTCASE(iswdigit(L'1')); TESTCASE(iswdigit(L'2')); TESTCASE(iswdigit(L'3')); TESTCASE(iswdigit(L'4')); TESTCASE(iswdigit(L'5')); TESTCASE(iswdigit(L'6')); TESTCASE(iswdigit(L'7')); TESTCASE(iswdigit(L'8')); TESTCASE(iswdigit(L'9')); TESTCASE(!iswdigit(L'a')); TESTCASE(!iswdigit(L'b')); TESTCASE(!iswdigit(L'c')); TESTCASE(!iswdigit(L'd')); TESTCASE(!iswdigit(L'e')); TESTCASE(!iswdigit(L'f')); TESTCASE(!iswdigit(L'A')); TESTCASE(!iswdigit(L'B')); TESTCASE(!iswdigit(L'C')); TESTCASE(!iswdigit(L'D')); TESTCASE(!iswdigit(L'E')); TESTCASE(!iswdigit(L'F')); TESTCASE(!iswdigit(L'g')); TESTCASE(!iswdigit(L'G')); TESTCASE(!iswdigit(L'x')); TESTCASE(!iswdigit(L'X')); TESTCASE(!iswdigit(L' ')); return TEST_RESULTS; }