sdcc/support/regression/tests/gcc-torture-execute-usad-run.c

   1 /*
   2    usad-run.c from the execute part of the gcc torture tests.
   3  */
   4
   5 #include <testfwk.h>
   6
   7 extern int abs (int __x);
   8
   9 static int
  10 foo (unsigned char *w, int i, unsigned char *x, int j)
  11 {
  12   int tot = 0;
  13   for (int a = 0; a < 16; a++)
  14     {
  15       for (int b = 0; b < 16; b++)
  16         tot += abs (w[b] - x[b]);
  17       w += i;
  18       x += j;
  19     }
  20   return tot;
  21 }
  22
  23 void
  24 bar (unsigned char *w, unsigned char *x, int i, int *result)
  25 {
  26   *result = foo (w, 16, x, i);
  27 }
  28
  29 void
  30 testTortureExecute (void)
  31 {
  32 #if !defined(__SDCC_mcs51) && !defined(__SDCC_pdk13) && !defined(__SDCC_pdk14) && !defined(__SDCC_pdk15) && !( (defined (__SDCC_mos6502) || defined(__SDCC_mos65c02 )) && defined(__SDCC_STACK_AUTO) ) // Lack of memory
  33   unsigned char m[256];
  34   unsigned char n[256];
  35   int sum, i;
  36
  37   for (i = 0; i < 256; ++i)
  38     if (i % 2 == 0)
  39       {
  40         m[i] = (i % 8) * 2 + 1;
  41         n[i] = -(i % 8);
  42       }
  43     else
  44       {
  45         m[i] = -((i % 8) * 2 + 2);
  46         n[i] = -((i % 8) >> 1);
  47       }
  48
  49   bar (m, n, 16, &sum);
  50
  51   if (sum != 32384)
  52     ASSERT (0);
  53
  54   return;
  55 #endif
  56 }