/*
  ISWCTYPE: int iswctype (wint_t wc, wctype_t desc);
*/

#define TST_FUNCTION iswctype

#include "tsp_common.c"
#include "dat_iswctype.c"


int
tst_iswctype (FILE *fp, int debug_flg)
{
  TST_DECL_VARS (int);
  wint_t wc;
  const char *ts;

  TST_DO_TEST (iswctype)
    {
      TST_HEAD_LOCALE (iswctype, S_ISWCTYPE);
      TST_DO_REC (iswctype)
	{
	  TST_GET_ERRET (iswctype);
	  wc = TST_INPUT (iswctype).wc;
	  ts = TST_INPUT (iswctype).ts;
	  ret = iswctype (wc, wctype (ts));
	  TST_SAVE_ERRNO;
	  if (debug_flg)
	    {
	      fprintf (stdout, "iswctype() [ %s : %d ] ret = %d\n",
		       locale, rec+1, ret);
	    }

	  TST_IF_RETURN (S_ISWCTYPE)
	    {
	      if (ret != 0)
		{
		  result (fp, C_SUCCESS, S_ISWCTYPE, locale, rec+1,
			  seq_num+1, 3, MS_PASSED);
		}
	      else
		{
		  err_count++;
		  result (fp, C_FAILURE, S_ISWCTYPE, locale, rec+1,
			  seq_num+1, 3,
			  "the function returned 0, but should be non-zero");
		}
	    }
	}
    }

  return err_count;
}