diff options
Diffstat (limited to 'newlib/testsuite/newlib.wctype')
-rw-r--r-- | newlib/testsuite/newlib.wctype/tiswctype.c | 61 | ||||
-rw-r--r-- | newlib/testsuite/newlib.wctype/twctrans.c | 23 | ||||
-rw-r--r-- | newlib/testsuite/newlib.wctype/twctype.c | 64 | ||||
-rw-r--r-- | newlib/testsuite/newlib.wctype/wctype.exp | 12 |
4 files changed, 0 insertions, 160 deletions
diff --git a/newlib/testsuite/newlib.wctype/tiswctype.c b/newlib/testsuite/newlib.wctype/tiswctype.c deleted file mode 100644 index da48fbb77..000000000 --- a/newlib/testsuite/newlib.wctype/tiswctype.c +++ /dev/null @@ -1,61 +0,0 @@ -#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); -} diff --git a/newlib/testsuite/newlib.wctype/twctrans.c b/newlib/testsuite/newlib.wctype/twctrans.c deleted file mode 100644 index a70e00175..000000000 --- a/newlib/testsuite/newlib.wctype/twctrans.c +++ /dev/null @@ -1,23 +0,0 @@ -#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); -} diff --git a/newlib/testsuite/newlib.wctype/twctype.c b/newlib/testsuite/newlib.wctype/twctype.c deleted file mode 100644 index 7adf5080d..000000000 --- a/newlib/testsuite/newlib.wctype/twctype.c +++ /dev/null @@ -1,64 +0,0 @@ -#include <wctype.h> -#include <ctype.h> -#include <stdio.h> -#include <string.h> -#include <newlib.h> -#include <locale.h> -#include "check.h" - -int main() -{ - if (_ELIX_LEVEL == 1) - { /* no testing..wctype functions aren't present */ } - else if (_MB_LEN_MAX == 1) - { - CHECK (iswalpha(L'a')); - CHECK (!iswalpha(L'3')); - CHECK (iswalnum(L'9')); - CHECK (!iswalnum(L'$')); - CHECK (iswcntrl(L'\n')); - CHECK (!iswcntrl(L'#')); - CHECK (iswdigit(L'2')); - CHECK (!iswdigit(L'a')); - CHECK (iswgraph(L'2')); - CHECK (!iswgraph(L' ')); - CHECK (iswlower(L'g')); - CHECK (!iswlower(L'G')); - CHECK (iswprint(L'*')); - CHECK (!iswprint(L'\n')); - CHECK (iswpunct(L',')); - CHECK (!iswpunct(L'\n')); - CHECK (iswspace(L'\t')); - CHECK (!iswspace(L':')); - CHECK (iswupper(L'G')); - CHECK (!iswupper(L'g')); - CHECK (iswxdigit(L'A')); - CHECK (!iswxdigit(L'g')); - } - else - { - setlocale (LC_CTYPE, "C-UTF-8"); - CHECK (iswalpha(0x0967)); - CHECK (!iswalpha(0x128e)); - CHECK (iswalnum(0x1d7ce)); - CHECK (!iswalnum(0x1d800)); - CHECK (iswcntrl(0x007f)); - CHECK (!iswcntrl(0x2027)); - CHECK (iswdigit(L'2')); - CHECK (!iswdigit(0x0009)); - CHECK (iswlower(0x03b3)); - CHECK (!iswlower(0x04aa)); - CHECK (iswprint(0x0b13)); - CHECK (!iswprint(0x0ce2)); - CHECK (iswpunct(0x002d)); - CHECK (!iswpunct(0x0a84)); - CHECK (iswspace(0x000a)); - CHECK (!iswspace(0x2060)); - CHECK (iswupper(0x01a4)); - CHECK (!iswupper(0x1e6d)); - CHECK (iswxdigit(L'A')); - CHECK (!iswxdigit(0x1f48)); - } - - exit (0); -} diff --git a/newlib/testsuite/newlib.wctype/wctype.exp b/newlib/testsuite/newlib.wctype/wctype.exp deleted file mode 100644 index cd5d7d689..000000000 --- a/newlib/testsuite/newlib.wctype/wctype.exp +++ /dev/null @@ -1,12 +0,0 @@ -# Copyright (C) 2002 by Red Hat, Incorporated. All rights reserved. -# -# Permission to use, copy, modify, and distribute this software -# is freely granted, provided that this notice is preserved. -# - -load_lib passfail.exp - -set exclude_list { -} - -newlib_pass_fail_all -x $exclude_list |