Logo Search packages:      
Sourcecode: belocs-locales-data version File versions  Download package

tst_wcsncat.c

/*
  WCSNCAT: wchar_t *wcsncat (wchar_t *ws1, const wchar_t *ws2, size_t n);
*/

#define TST_FUNCTION wcsncat

#include "tsp_common.c"
#include "dat_wcsncat.c"

int
tst_wcsncat (FILE * fp, int debug_flg)
{
  TST_DECL_VARS (wchar_t *);
  wchar_t *ws1, *ws2, *ws_ex;
  int n, i, err;

  TST_DO_TEST (wcsncat)
  {
    TST_HEAD_LOCALE (wcsncat, S_WCSNCAT);
    TST_DO_REC (wcsncat)
    {
      TST_GET_ERRET (wcsncat);
      ws1 = TST_INPUT (wcsncat).ws1;      /* external value: size WCSSIZE */
      ws2 = TST_INPUT (wcsncat).ws2;
      n = TST_INPUT (wcsncat).n;
      ret = wcsncat (ws1, ws2, n);

      TST_IF_RETURN (S_WCSNCAT)
      {
      if (ret == ws1)
        {
          Result (C_SUCCESS, S_WCSNCAT, CASE_3, MS_PASSED);
        }
      else
        {
          err_count++;
          Result (C_FAILURE, S_WCSNCAT, CASE_3,
                "the return address may not be correct");
        }
      }

      if (ret == ws1)
      {
        ws_ex = TST_EXPECT (wcsncat).ws;

        for (err = 0, i = 0;
             (ws1[i] != 0L || ws_ex[i] != 0L) && i < WCSSIZE; i++)
          {
            if (debug_flg)
            {
              fprintf (stderr, "ws1[%d] = 0x%lx\n", i,
                     (unsigned long int) ws1[i]);
            }

            if (ws1[i] != ws_ex[i])
            {
              err++;
              err_count++;
              Result (C_FAILURE, S_WCSNCAT, CASE_4,
                    "the concatinated string has "
                    "different value from an expected string");
              break;
            }
          }

        if (!err)
          {
            Result (C_SUCCESS, S_WCSNCAT, CASE_4, MS_PASSED);
          }
      }
    }
  }

  return err_count;
}

Generated by  Doxygen 1.6.0   Back to index