wctype/test_wcfuncs.c

   1 /* Copyright (C) 1999 Free Software Foundation, Inc.
   2    This file is part of the GNU C Library.
   3
   4    The GNU C Library is free software; you can redistribute it and/or
   5    modify it under the terms of the GNU Library General Public License as
   6    published by the Free Software Foundation; either version 2 of the
   7    License, or (at your option) any later version.
   8
   9    The GNU C Library is distributed in the hope that it will be useful,
  10    but WITHOUT ANY WARRANTY; without even the implied warranty of
  11    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  12    Library General Public License for more details.
  13
  14    You should have received a copy of the GNU Library General Public
  15    License along with the GNU C Library; see the file COPYING.LIB.  If not,
  16    write to the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
  17    Boston, MA 02111-1307, USA.  */
  18
  19 #include <stdio.h>
  20 #include <wctype.h>
  21
  22 int
  23 main (int argc, char *argv[])
  24 {
  25   int result = 0;
  26   wint_t ch;
  27
  28
  29   for (ch = 0; ch < 128; ++ch)
  30     {
  31       if (iswlower (ch))
  32         {
  33           /* Get corresponding upper case character.  */
  34           wint_t up = towupper (ch);
  35           /* This should have no effect.  */
  36           wint_t low  = towlower (ch);
  37
  38           if ((ch != low) || (up == ch) || (up == low))
  39             {
  40               printf ("iswlower/towupper/towlower for character \\%x failed\n", ch);
  41               result++;
  42             }
  43         }
  44       if (iswupper (ch))
  45         {
  46           /* Get corresponding lower case character.  */
  47           wint_t low = towlower (ch);
  48           /* This should have no effect.  */
  49           wint_t up  = towupper (ch);
  50
  51           if ((ch != up) || (low == ch) || (up == low))
  52             {
  53               printf ("iswupper/towlower/towupper for character \\%x failed\n", ch);
  54               result++;
  55             }
  56         }
  57     }
  58
  59   /* Finally some specific tests.  */
  60   ch = L'A';
  61   if (!iswupper (ch) || iswlower (ch))
  62     {
  63       printf ("!iswupper/iswlower (L'A') failed\n");
  64       result++;
  65
  66     }
  67   ch = L'a';
  68   if (iswupper (ch) || !iswlower (ch))
  69     {
  70       printf ("iswupper/!iswlower (L'a') failed\n");
  71       result++;
  72     }
  73   if (towlower (L'A') != L'a')
  74     {
  75       printf ("towlower(L'A') failed\n");
  76       result++;
  77     }
  78   if (towupper (L'a') != L'A')
  79     {
  80       printf ("towupper(L'a') failed\n");
  81       result++;
  82     }
  83
  84   if (result == 0)
  85     puts ("All test successful!");
  86   exit (result);
  87 }