2002-10-18 Jeff Johnston <jjohnstn@redhat.com>

* testsuite/newlib.wctype/tiswctype.c: New test case.
        * testsuite/newlib.wctype/twctrans.c: Ditto.
This commit is contained in:
Jeff Johnston 2002-10-18 23:39:07 +00:00
parent a42cf80a9d
commit 978ea3cf1c
3 changed files with 89 additions and 0 deletions

View File

@ -1,3 +1,8 @@
2002-10-18 Jeff Johnston <jjohnstn@redhat.com>
* testsuite/newlib.wctype/tiswctype.c: New test case.
* testsuite/newlib.wctype/twctrans.c: Ditto.
2002-10-18 Jeff Johnston <jjohnstn@redhat.com>
* libc/sys/linux/machine/i386/include/endian.h: New file.

View File

@ -0,0 +1,61 @@
#include <wctype.h>
#include <newlib.h>
#include "check.h"
int main()
{
wctype_t x;
x = wctype ("alpha");
CHECK (x != 0);
CHECK (iswctype (L'a', x) && isalpha ('a'));
x = wctype ("alnum");
CHECK (x != 0);
CHECK (iswctype (L'0', x) && isalnum ('0'));
x = wctype ("blank");
CHECK (x != 0);
CHECK (iswctype (L' ', x) && isblank (' '));
x = wctype ("cntrl");
CHECK (x != 0);
CHECK (iswctype (L'\n', x) && iscntrl ('\n'));
x = wctype ("digit");
CHECK (x != 0);
CHECK (iswctype (L'7', x) && isdigit ('7'));
x = wctype ("graph");
CHECK (x != 0);
CHECK (iswctype (L'!', x) && isgraph ('!'));
x = wctype ("lower");
CHECK (x != 0);
CHECK (iswctype (L'k', x) && islower ('k'));
x = wctype ("print");
CHECK (x != 0);
CHECK (iswctype (L'@', x) && isprint ('@'));
x = wctype ("punct");
CHECK (x != 0);
CHECK (iswctype (L'.', x) && ispunct ('.'));
x = wctype ("space");
CHECK (x != 0);
CHECK (iswctype (L'\t', x) && isspace ('\t'));
x = wctype ("upper");
CHECK (x != 0);
CHECK (iswctype (L'T', x) && isupper ('T'));
x = wctype ("xdigit");
CHECK (x != 0);
CHECK (iswctype (L'B', x) && isxdigit ('B'));
x = wctype ("unknown");
CHECK (x == 0);
exit (0);
}

View File

@ -0,0 +1,23 @@
#include <wctype.h>
#include <newlib.h>
#include "check.h"
int main()
{
wctrans_t x;
x = wctrans ("tolower");
CHECK (x != 0);
CHECK (towctrans (L'A', x) == tolower ('A'));
CHECK (towctrans (L'5', x) == tolower ('5'));
x = wctrans ("toupper");
CHECK (x != 0);
CHECK (towctrans (L'c', x) == toupper ('c'));
CHECK (towctrans (L'9', x) == toupper ('9'));
x = wctrans ("unknown");
CHECK (x == 0);
exit (0);
}