From ea48e2c4cc0b0a5e09e9407c9309d4a85926e8b7 Mon Sep 17 00:00:00 2001 From: Ulrich Drepper Date: Wed, 14 Apr 1999 23:49:40 +0000 Subject: Update. 1999-04-14 Andreas Jaeger * wctype/test_wcfuncs.c: New file, tests towlower and towupper. * wctype/Makefile (tests): Add test_wcfuncs. --- wctype/Makefile | 2 +- wctype/test_wcfuncs.c | 87 +++++++++++++++++++++++++++++++++++++++++++++++++++ 2 files changed, 88 insertions(+), 1 deletion(-) create mode 100644 wctype/test_wcfuncs.c (limited to 'wctype') diff --git a/wctype/Makefile b/wctype/Makefile index 3484ea5d68..fe00e58d2a 100644 --- a/wctype/Makefile +++ b/wctype/Makefile @@ -26,6 +26,6 @@ distribute := cname-lookup.h routines := wcfuncs wctype iswctype wctrans towctrans wcextra \ wcfuncs_l iswctype_l towctrans_l wctype_l wcextra_l -tests := test_wctype +tests := test_wctype test_wcfuncs include ../Rules diff --git a/wctype/test_wcfuncs.c b/wctype/test_wcfuncs.c new file mode 100644 index 0000000000..7ced68ba5d --- /dev/null +++ b/wctype/test_wcfuncs.c @@ -0,0 +1,87 @@ +/* Copyright (C) 1999 Free Software Foundation, Inc. + This file is part of the GNU C Library. + + The GNU C Library is free software; you can redistribute it and/or + modify it under the terms of the GNU Library General Public License as + published by the Free Software Foundation; either version 2 of the + License, or (at your option) any later version. + + The GNU C Library is distributed in the hope that it will be useful, + but WITHOUT ANY WARRANTY; without even the implied warranty of + MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU + Library General Public License for more details. + + You should have received a copy of the GNU Library General Public + License along with the GNU C Library; see the file COPYING.LIB. If not, + write to the Free Software Foundation, Inc., 59 Temple Place - Suite 330, + Boston, MA 02111-1307, USA. */ + +#include +#include + +int +main (int argc, char *argv[]) +{ + int result = 0; + wint_t ch; + + + for (ch = 0; ch < 128; ++ch) + { + if (iswlower (ch)) + { + /* Get corresponding upper case character. */ + wint_t up = towupper (ch); + /* This should have no effect. */ + wint_t low = towlower (ch); + + if ((ch != low) || (up == ch) || (up == low)) + { + printf ("iswlower/towupper/towlower for character \\%x failed\n", ch); + result++; + } + } + if (iswupper (ch)) + { + /* Get corresponding lower case character. */ + wint_t low = towlower (ch); + /* This should have no effect. */ + wint_t up = towupper (ch); + + if ((ch != up) || (low == ch) || (up == low)) + { + printf ("iswupper/towlower/towupper for character \\%x failed\n", ch); + result++; + } + } + } + + /* Finally some specific tests. */ + ch = L'A'; + if (!iswupper (ch) || iswlower (ch)) + { + printf ("!iswupper/iswlower (L'A') failed\n"); + result++; + + } + ch = L'a'; + if (iswupper (ch) || !iswlower (ch)) + { + printf ("iswupper/!iswlower (L'a') failed\n"); + result++; + } + if (towlower (L'A') != L'a') + { + printf ("towlower(L'A') failed\n"); + result++; + } + if (towupper (L'a') != L'A') + { + printf ("towupper(L'a') failed\n"); + result++; + } + + if (result == 0) + puts ("All test successful!"); + exit (result); +} -- cgit v1.2.3