tests/test-wctype.c

   1 /* Test of <wctype.h> substitute.
   2    Copyright (C) 2007-2009 Free Software Foundation, Inc.
   3
   4    This program is free software: you can redistribute it and/or modify
   5    it under the terms of the GNU General Public License as published by
   6    the Free Software Foundation; either version 3 of the License, or
   7    (at your option) any later version.
   8
   9    This program 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
  12    GNU General Public License for more details.
  13
  14    You should have received a copy of the GNU General Public License
  15    along with this program.  If not, see <http://www.gnu.org/licenses/>.  */
  16
  17 /* Written by Bruno Haible <bruno@clisp.org>, 2007.  */
  18
  19 #include <config.h>
  20
  21 #include <wctype.h>
  22
  23 #include <stdio.h>
  24 #include <stdlib.h>
  25
  26 #define ASSERT(expr) \
  27   do                                                                         \
  28     {                                                                        \
  29       if (!(expr))                                                           \
  30         {                                                                    \
  31           fprintf (stderr, "%s:%d: assertion failed\n", __FILE__, __LINE__); \
  32           fflush (stderr);                                                   \
  33           abort ();                                                          \
  34         }                                                                    \
  35     }                                                                        \
  36   while (0)
  37
  38 /* Check that the type wint_t is defined.  */
  39 wint_t a = 'x';
  40 /* Check that WEOF is defined.  */
  41 wint_t e = WEOF;
  42
  43 int
  44 main (void)
  45 {
  46   /* Check that the isw* functions exist as functions or as macros.  */
  47   (void) iswalnum (0);
  48   (void) iswalpha (0);
  49 #if 0 /* not portable: missing on mingw */
  50   (void) iswblank (0);
  51 #endif
  52   (void) iswcntrl (0);
  53   (void) iswdigit (0);
  54   (void) iswgraph (0);
  55   (void) iswlower (0);
  56   (void) iswprint (0);
  57   (void) iswpunct (0);
  58   (void) iswspace (0);
  59   (void) iswupper (0);
  60   (void) iswxdigit (0);
  61
  62   /* Check that the isw* functions map WEOF to 0.  */
  63   ASSERT (!iswalnum (e));
  64   ASSERT (!iswalpha (e));
  65 #if 0 /* not portable: missing on mingw */
  66   ASSERT (!iswblank (e));
  67 #endif
  68   ASSERT (!iswcntrl (e));
  69   ASSERT (!iswdigit (e));
  70   ASSERT (!iswgraph (e));
  71   ASSERT (!iswlower (e));
  72   ASSERT (!iswprint (e));
  73   ASSERT (!iswpunct (e));
  74   ASSERT (!iswspace (e));
  75   ASSERT (!iswupper (e));
  76   ASSERT (!iswxdigit (e));
  77
  78   /* Check that the tow* functions exist as functions or as macros.  */
  79   (void) towlower (0);
  80   (void) towupper (0);
  81
  82   /* Check that the tow* functions map WEOF to WEOF.  */
  83   ASSERT (towlower (e) == e);
  84   ASSERT (towupper (e) == e);
  85
  86   return 0;
  87 }