l4/pkg/l4re-core/uclibc/lib/contrib/uclibc/test/locale-mbwc/tst_iswctype.c

   1 /*
   2   ISWCTYPE: int iswctype (wint_t wc, wctype_t desc);
   3 */
   4
   5 #define TST_FUNCTION iswctype
   6
   7 #include "tsp_common.c"
   8 #include "dat_iswctype.c"
   9
  10
  11 int
  12 tst_iswctype (FILE *fp, int debug_flg)
  13 {
  14   TST_DECL_VARS (int);
  15   wint_t wc;
  16   const char *ts;
  17
  18   TST_DO_TEST (iswctype)
  19     {
  20       TST_HEAD_LOCALE (iswctype, S_ISWCTYPE);
  21       TST_DO_REC (iswctype)
  22         {
  23           TST_GET_ERRET (iswctype);
  24           wc = TST_INPUT (iswctype).wc;
  25           ts = TST_INPUT (iswctype).ts;
  26           ret = iswctype (wc, wctype (ts));
  27           TST_SAVE_ERRNO;
  28           if (debug_flg)
  29             {
  30               fprintf (stdout, "iswctype() [ %s : %d ] ret = %d\n",
  31                        locale, rec+1, ret);
  32             }
  33
  34           TST_IF_RETURN (S_ISWCTYPE)
  35             {
  36               if (ret != 0)
  37                 {
  38                   result (fp, C_SUCCESS, S_ISWCTYPE, locale, rec+1,
  39                           seq_num+1, 3, MS_PASSED);
  40                 }
  41               else
  42                 {
  43                   err_count++;
  44                   result (fp, C_FAILURE, S_ISWCTYPE, locale, rec+1,
  45                           seq_num+1, 3,
  46                           "the function returned 0, but should be non-zero");
  47                 }
  48             }
  49         }
  50     }
  51
  52   return err_count;
  53 }