sdcc/support/regression/tests/gcc-torture-execute-921013-1.c

   1 /*
   2    921013-1.c from the execute part of the gcc torture suite.
   3  */
   4
   5 #include <testfwk.h>
   6
   7 #ifdef __SDCC
   8 #pragma std_c99
   9 #endif
  10
  11 #if !defined(__SDCC_pdk14) // Lack of memory
  12 void f(int *d, float *x, float *y,int n)
  13 {
  14   while(n--){*d++=*x++==*y++;}
  15 }
  16 #endif
  17
  18 void
  19 testTortureExecute (void)
  20 {
  21 #if !defined(__SDCC_pdk14) // Lack of memory
  22   int r[4]={2,2,2,2};
  23   float a[]={5,1,3,5};
  24   float b[]={2,4,3,0};
  25
  26   f(r,a,b,4);
  27   ASSERT ((a[0]==b[0]) == r[0]);
  28   ASSERT ((a[1]==b[1]) == r[1]);
  29   ASSERT ((a[2]==b[2]) == r[2]);
  30   ASSERT ((a[3]==b[3]) == r[3]);
  31   return;
  32 #endif
  33 }