gcc/testsuite/gcc.target/avr/torture/sat-llk-plus-minus.c

   1 /* { dg-do run } */
   2 /* { dg-options "-std=gnu99 -fwrapv" } */
   3
   4 #include "fix-types.h"
   5
   6 extern void abort (void);
   7 extern void exit (int);
   8
   9 typedef long long _Accum fx_t;
  10 typedef long long _Sat _Accum satfx_t;
  11 typedef long long intfx_t;
  12
  13 SS_LFUN (ss_add, +, fx_t, llk, >)
  14 SS_LFUN (ss_sub, -, fx_t, llk, <)
  15
  16 #define VAL(N, X)                               \
  17   __attribute__((noinline,noclone))             \
  18   satfx_t ss_add2_##N (satfx_t a)               \
  19   {                                             \
  20     return ss_add_llk (a, X##P##-##48llk);      \
  21   }                                             \
  22   __attribute__((noinline,noclone))             \
  23   satfx_t ss_add_##N (satfx_t a)                \
  24   {                                             \
  25     return a + X##P##-##48llk;                  \
  26   }                                             \
  27   __attribute__((noinline,noclone))             \
  28   satfx_t ss_sub2_##N (satfx_t a)               \
  29   {                                             \
  30     return ss_sub_llk (a, X##P##-##48llk);      \
  31   }                                             \
  32   __attribute__((noinline,noclone))             \
  33   satfx_t ss_sub_##N (satfx_t a)                \
  34   {                                             \
  35     return a - X##P##-##48llk;                  \
  36   }
  37 #include "vals-llk.def"
  38 #undef VAL
  39
  40 __attribute__((noinline,noclone))
  41 satfx_t ss_add2_99 (satfx_t a)
  42 {
  43   return ss_add_llk (a, __LLACCUM_MIN__);
  44 }
  45
  46 __attribute__((noinline,noclone))
  47 satfx_t ss_add_99 (satfx_t a)
  48 {
  49   return a + __LLACCUM_MIN__;
  50 }
  51
  52 __attribute__((noinline,noclone))
  53 satfx_t ss_sub2_99 (satfx_t a)
  54 {
  55   return ss_sub_llk (a, __LLACCUM_MIN__);
  56 }
  57
  58 __attribute__((noinline,noclone))
  59 satfx_t ss_sub_99 (satfx_t a)
  60 {
  61   return a - __LLACCUM_MIN__;
  62 }
  63
  64
  65 satfx_t (* __flash const fun[])(satfx_t) =
  66 {
  67 #define VAL(N, X)                               \
  68   ss_add_##N, ss_add2_##N,                      \
  69   ss_sub_##N, ss_sub2_##N,
  70 #include "vals-llk.def"
  71   VAL (99,)
  72 #undef VAL
  73 };
  74
  75
  76 const volatile __flash intfx_t vals[] =
  77   {
  78     0, -1, 1, -2, 2, -127, -128, -129,
  79     0x7f, 0x80, 0x81, 0x100,
  80     0x4000000000000000, 0x3e80000000000000, 0x3f80000000000000,
  81     0x7ffffffffffffffe, 0x7fffffffffffffff, 0x7f80000000000000,
  82     0x7f7f7f7f7f7f7f7f, 0x7f81000000000080, 0x7f00000080000000,
  83     0x7f00000000000001,
  84     0x8000000000000000, 0x8000000000000001, 0x8080808080808080,
  85     0x8081000000000000, 0x80ffffffffffffff, 0x80fffffffffffffe,
  86     0x8100000000000000, 0x8180000000000000, 0x818000000000000,
  87     0xff00000000000000, 0xffffffffffffff01, 0xffffffffffffff80,
  88     0xffffffffffffff7f, 0xff80ff80ff80ff80
  89   };
  90
  91
  92 int main (void)
  93 {
  94   for (unsigned int i = 0; i < sizeof (vals) / sizeof (*vals); i++)
  95     {
  96       satfx_t a, f1, f2;
  97       intfx_t val = vals[i];
  98       __builtin_memcpy (&a, &val, sizeof (satfx_t));
  99       for (unsigned int f = 0; f < sizeof (fun) / sizeof (*fun); f += 2)
 100         {
 101           if (fun[f](a) != fun[f+1](a))
 102             abort();
 103         }
 104     }
 105
 106   exit (0);
 107   return 0;
 108 }