gcc/testsuite/gcc.target/powerpc/pr79916.c

   1 /* { dg-do compile  { target { powerpc*-*-* } } } */
   2 /* { dg-require-effective-target dfp } */
   3 /* { dg-options "-fno-expensive-optimizations --param ira-max-conflict-table-size=0 -mno-popcntd -O3" } */
   4
   5 #define PASTE2(A,B) A ## B
   6 #define PASTE(A,B) PASTE2(A,B)
   7
   8 #define TESTVAL_NEG(VAL,SUF,SIZE)                                       \
   9   x = PASTE(PASTE(VAL,.),SUF);                                          \
  10   si = VAL;                                                             \
  11   sll = PASTE(VAL,LL);                                                  \
  12   a = si;                                                               \
  13   b = sll;                                                              \
  14   c = VAL;                                                              \
  15   d = PASTE(VAL,LL);                                                    \
  16   if ((__builtin_memcmp ((void *)&x, (void *)&a, SIZE) != 0)            \
  17       || (__builtin_memcmp ((void *)&x, (void *)&b,SIZE) != 0)          \
  18       || (__builtin_memcmp ((void *)&x, (void *)&c,SIZE) != 0)          \
  19       || (__builtin_memcmp ((void *)&x, (void *)&d,SIZE) != 0))         \
  20     __builtin_abort ();
  21
  22 #define TESTVAL_NEG_BIG(VAL,SUF,SIZE)                                   \
  23   x = PASTE(PASTE(VAL,.),SUF);                                          \
  24   sll = PASTE(VAL,LL);                                                  \
  25   a = sll;                                                              \
  26   b = PASTE(VAL,LL);                                                    \
  27   if ((__builtin_memcmp ((void *)&x, (void *)&a, SIZE) != 0)            \
  28       || (__builtin_memcmp ((void *)&x, (void *)&b,SIZE) != 0))         \
  29     __builtin_abort ();
  30
  31 #define TESTVAL_NONNEG(VAL,SUF,SIZE)                                    \
  32   x = PASTE(PASTE(VAL,.),SUF);                                          \
  33   si = VAL;                                                             \
  34   ui = VAL;                                                             \
  35   sll = PASTE(VAL,LL);                                                  \
  36   ull = PASTE(VAL,ULL);                                                 \
  37   a = si;                                                               \
  38   b = sll;                                                              \
  39   c = ui;                                                               \
  40   d = ull;                                                              \
  41   e = VAL;                                                              \
  42   f = VAL;                                                              \
  43   g = PASTE(VAL,LL);                                                    \
  44   h = PASTE(VAL,ULL);                                                   \
  45   if ((__builtin_memcmp ((void *)&x, (void *)&a, SIZE) != 0)            \
  46       || (__builtin_memcmp ((void *)&x, (void *)&b,SIZE) != 0)          \
  47       || (__builtin_memcmp ((void *)&x, (void *)&c,SIZE) != 0)          \
  48       || (__builtin_memcmp ((void *)&x, (void *)&d,SIZE) != 0)          \
  49       || (__builtin_memcmp ((void *)&x, (void *)&e,SIZE) != 0)          \
  50       || (__builtin_memcmp ((void *)&x, (void *)&f,SIZE) != 0)          \
  51       || (__builtin_memcmp ((void *)&x, (void *)&g,SIZE) != 0)          \
  52       || (__builtin_memcmp ((void *)&x, (void *)&h,SIZE) != 0))         \
  53     __builtin_abort ();
  54
  55 #define TESTVAL_NONNEG_BIG(VAL,SUF,SIZE)                                \
  56   x = PASTE(PASTE(VAL,.),SUF);                                          \
  57   sll = PASTE(VAL,LL);                                                  \
  58   ull = PASTE(VAL,ULL);                                                 \
  59   b = sll;                                                              \
  60   d = ull;                                                              \
  61   f = PASTE(VAL,LL);                                                    \
  62   g = PASTE(VAL,ULL);                                                   \
  63   if ((__builtin_memcmp ((void *)&x, (void *)&b, SIZE) != 0)            \
  64       || (__builtin_memcmp ((void *)&d, (void *)&d,SIZE) != 0)          \
  65       || (__builtin_memcmp ((void *)&f, (void *)&d,SIZE) != 0)          \
  66       || (__builtin_memcmp ((void *)&g, (void *)&d,SIZE) != 0))         \
  67     __builtin_abort ();
  68
  69 #undef SUFFIX
  70 #define SUFFIX DF
  71 #undef TYPE
  72 #define TYPE _Decimal32
  73
  74 void
  75 zeroes_32 (void)
  76 {
  77   volatile TYPE x, a, b, c, d, e, f, g, h;
  78   volatile int si;
  79   volatile unsigned int ui;
  80   volatile long long sll;
  81   volatile unsigned long long ull;
  82
  83   TESTVAL_NONNEG (0, SUFFIX, sizeof (TYPE));
  84   TESTVAL_NONNEG (1, SUFFIX, sizeof (TYPE));
  85   TESTVAL_NONNEG (5, SUFFIX, sizeof (TYPE));
  86   TESTVAL_NONNEG (9, SUFFIX, sizeof (TYPE));
  87   TESTVAL_NONNEG (10, SUFFIX, sizeof (TYPE));
  88   TESTVAL_NONNEG (50, SUFFIX, sizeof (TYPE));
  89   TESTVAL_NONNEG (90, SUFFIX, sizeof (TYPE));
  90   TESTVAL_NONNEG (100, SUFFIX, sizeof (TYPE));
  91   TESTVAL_NONNEG (500, SUFFIX, sizeof (TYPE));
  92   TESTVAL_NONNEG (900, SUFFIX, sizeof (TYPE));
  93   TESTVAL_NONNEG (1000, SUFFIX, sizeof (TYPE));
  94   TESTVAL_NONNEG (5000, SUFFIX, sizeof (TYPE));
  95   TESTVAL_NONNEG (9000, SUFFIX, sizeof (TYPE));
  96   TESTVAL_NONNEG (10000, SUFFIX, sizeof (TYPE));
  97   TESTVAL_NONNEG (50000, SUFFIX, sizeof (TYPE));
  98   TESTVAL_NONNEG (90000, SUFFIX, sizeof (TYPE));
  99   TESTVAL_NONNEG (100000, SUFFIX, sizeof (TYPE));
 100   TESTVAL_NONNEG (500000, SUFFIX, sizeof (TYPE));
 101   TESTVAL_NONNEG (900000, SUFFIX, sizeof (TYPE));
 102   TESTVAL_NONNEG (1000000, SUFFIX, sizeof (TYPE));
 103   TESTVAL_NONNEG (5000000, SUFFIX, sizeof (TYPE));
 104   TESTVAL_NONNEG (9000000, SUFFIX, sizeof (TYPE));
 105   TESTVAL_NONNEG (10000000, SUFFIX, sizeof (TYPE));
 106   TESTVAL_NONNEG (50000000, SUFFIX, sizeof (TYPE));
 107   TESTVAL_NONNEG (90000000, SUFFIX, sizeof (TYPE));
 108   TESTVAL_NONNEG (100000000, SUFFIX, sizeof (TYPE));
 109   TESTVAL_NONNEG (500000000, SUFFIX, sizeof (TYPE));
 110   TESTVAL_NONNEG (900000000, SUFFIX, sizeof (TYPE));
 111   TESTVAL_NONNEG (1000000000, SUFFIX, sizeof (TYPE));
 112   TESTVAL_NONNEG_BIG (5000000000, SUFFIX, sizeof (TYPE));
 113   TESTVAL_NONNEG_BIG (9000000000, SUFFIX, sizeof (TYPE));
 114   TESTVAL_NONNEG_BIG (10000000000, SUFFIX, sizeof (TYPE));
 115   TESTVAL_NONNEG_BIG (50000000000, SUFFIX, sizeof (TYPE));
 116   TESTVAL_NONNEG_BIG (90000000000, SUFFIX, sizeof (TYPE));
 117   TESTVAL_NONNEG_BIG (100000000000, SUFFIX, sizeof (TYPE));
 118   TESTVAL_NONNEG_BIG (500000000000, SUFFIX, sizeof (TYPE));
 119   TESTVAL_NONNEG_BIG (900000000000, SUFFIX, sizeof (TYPE));
 120   TESTVAL_NONNEG_BIG (1000000000000, SUFFIX, sizeof (TYPE));
 121   TESTVAL_NONNEG_BIG (5000000000000, SUFFIX, sizeof (TYPE));
 122   TESTVAL_NONNEG_BIG (9000000000000, SUFFIX, sizeof (TYPE));
 123   TESTVAL_NONNEG_BIG (10000000000000, SUFFIX, sizeof (TYPE));
 124   TESTVAL_NONNEG_BIG (50000000000000, SUFFIX, sizeof (TYPE));
 125   TESTVAL_NONNEG_BIG (90000000000000, SUFFIX, sizeof (TYPE));
 126   TESTVAL_NONNEG_BIG (100000000000000, SUFFIX, sizeof (TYPE));
 127   TESTVAL_NONNEG_BIG (500000000000000, SUFFIX, sizeof (TYPE));
 128   TESTVAL_NONNEG_BIG (900000000000000, SUFFIX, sizeof (TYPE));
 129   TESTVAL_NONNEG_BIG (1000000000000000, SUFFIX, sizeof (TYPE));
 130   TESTVAL_NONNEG_BIG (5000000000000000, SUFFIX, sizeof (TYPE));
 131   TESTVAL_NONNEG_BIG (9000000000000000, SUFFIX, sizeof (TYPE));
 132   TESTVAL_NONNEG_BIG (10000000000000000, SUFFIX, sizeof (TYPE));
 133   TESTVAL_NONNEG_BIG (50000000000000000, SUFFIX, sizeof (TYPE));
 134   TESTVAL_NONNEG_BIG (90000000000000000, SUFFIX, sizeof (TYPE));
 135   TESTVAL_NONNEG_BIG (100000000000000000, SUFFIX, sizeof (TYPE));
 136   TESTVAL_NONNEG_BIG (500000000000000000, SUFFIX, sizeof (TYPE));
 137   TESTVAL_NONNEG_BIG (900000000000000000, SUFFIX, sizeof (TYPE));
 138   TESTVAL_NONNEG_BIG (1000000000000000000, SUFFIX, sizeof (TYPE));
 139   TESTVAL_NONNEG_BIG (5000000000000000000, SUFFIX, sizeof (TYPE));
 140   TESTVAL_NONNEG_BIG (9000000000000000000, SUFFIX, sizeof (TYPE));
 141
 142   TESTVAL_NEG (0, SUFFIX, sizeof (TYPE));
 143   TESTVAL_NEG (-1, SUFFIX, sizeof (TYPE));
 144   TESTVAL_NEG (-5, SUFFIX, sizeof (TYPE));
 145   TESTVAL_NEG (-9, SUFFIX, sizeof (TYPE));
 146   TESTVAL_NEG (-10, SUFFIX, sizeof (TYPE));
 147   TESTVAL_NEG (-50, SUFFIX, sizeof (TYPE));
 148   TESTVAL_NEG (-90, SUFFIX, sizeof (TYPE));
 149   TESTVAL_NEG (-100, SUFFIX, sizeof (TYPE));
 150   TESTVAL_NEG (-500, SUFFIX, sizeof (TYPE));
 151   TESTVAL_NEG (-900, SUFFIX, sizeof (TYPE));
 152   TESTVAL_NEG (-1000, SUFFIX, sizeof (TYPE));
 153   TESTVAL_NEG (-5000, SUFFIX, sizeof (TYPE));
 154   TESTVAL_NEG (-9000, SUFFIX, sizeof (TYPE));
 155   TESTVAL_NEG (-10000, SUFFIX, sizeof (TYPE));
 156   TESTVAL_NEG (-50000, SUFFIX, sizeof (TYPE));
 157   TESTVAL_NEG (-90000, SUFFIX, sizeof (TYPE));
 158   TESTVAL_NEG (-100000, SUFFIX, sizeof (TYPE));
 159   TESTVAL_NEG (-500000, SUFFIX, sizeof (TYPE));
 160   TESTVAL_NEG (-900000, SUFFIX, sizeof (TYPE));
 161   TESTVAL_NEG (-1000000, SUFFIX, sizeof (TYPE));
 162   TESTVAL_NEG (-5000000, SUFFIX, sizeof (TYPE));
 163   TESTVAL_NEG (-9000000, SUFFIX, sizeof (TYPE));
 164   TESTVAL_NEG (-10000000, SUFFIX, sizeof (TYPE));
 165   TESTVAL_NEG (-50000000, SUFFIX, sizeof (TYPE));
 166   TESTVAL_NEG (-90000000, SUFFIX, sizeof (TYPE));
 167   TESTVAL_NEG (-100000000, SUFFIX, sizeof (TYPE));
 168   TESTVAL_NEG (-500000000, SUFFIX, sizeof (TYPE));
 169   TESTVAL_NEG (-900000000, SUFFIX, sizeof (TYPE));
 170   TESTVAL_NEG (-1000000000, SUFFIX, sizeof (TYPE));
 171   TESTVAL_NEG_BIG (-5000000000, SUFFIX, sizeof (TYPE));
 172   TESTVAL_NEG_BIG (-9000000000, SUFFIX, sizeof (TYPE));
 173   TESTVAL_NEG_BIG (-10000000000, SUFFIX, sizeof (TYPE));
 174   TESTVAL_NEG_BIG (-50000000000, SUFFIX, sizeof (TYPE));
 175   TESTVAL_NEG_BIG (-90000000000, SUFFIX, sizeof (TYPE));
 176   TESTVAL_NEG_BIG (-100000000000, SUFFIX, sizeof (TYPE));
 177   TESTVAL_NEG_BIG (-500000000000, SUFFIX, sizeof (TYPE));
 178   TESTVAL_NEG_BIG (-900000000000, SUFFIX, sizeof (TYPE));
 179   TESTVAL_NEG_BIG (-1000000000000, SUFFIX, sizeof (TYPE));
 180   TESTVAL_NEG_BIG (-5000000000000, SUFFIX, sizeof (TYPE));
 181   TESTVAL_NEG_BIG (-9000000000000, SUFFIX, sizeof (TYPE));
 182   TESTVAL_NEG_BIG (-10000000000000, SUFFIX, sizeof (TYPE));
 183   TESTVAL_NEG_BIG (-50000000000000, SUFFIX, sizeof (TYPE));
 184   TESTVAL_NEG_BIG (-90000000000000, SUFFIX, sizeof (TYPE));
 185   TESTVAL_NEG_BIG (-100000000000000, SUFFIX, sizeof (TYPE));
 186   TESTVAL_NEG_BIG (-500000000000000, SUFFIX, sizeof (TYPE));
 187   TESTVAL_NEG_BIG (-900000000000000, SUFFIX, sizeof (TYPE));
 188   TESTVAL_NEG_BIG (-1000000000000000, SUFFIX, sizeof (TYPE));
 189   TESTVAL_NEG_BIG (-5000000000000000, SUFFIX, sizeof (TYPE));
 190   TESTVAL_NEG_BIG (-9000000000000000, SUFFIX, sizeof (TYPE));
 191   TESTVAL_NEG_BIG (-10000000000000000, SUFFIX, sizeof (TYPE));
 192   TESTVAL_NEG_BIG (-50000000000000000, SUFFIX, sizeof (TYPE));
 193   TESTVAL_NEG_BIG (-90000000000000000, SUFFIX, sizeof (TYPE));
 194   TESTVAL_NEG_BIG (-100000000000000000, SUFFIX, sizeof (TYPE));
 195   TESTVAL_NEG_BIG (-500000000000000000, SUFFIX, sizeof (TYPE));
 196   TESTVAL_NEG_BIG (-900000000000000000, SUFFIX, sizeof (TYPE));
 197   TESTVAL_NEG_BIG (-1000000000000000000, SUFFIX, sizeof (TYPE));
 198   TESTVAL_NEG_BIG (-5000000000000000000, SUFFIX, sizeof (TYPE));
 199   TESTVAL_NEG_BIG (-9000000000000000000, SUFFIX, sizeof (TYPE));
 200 }
 201
 202 void
 203 round_32 (void)
 204 {
 205   volatile TYPE x, a, b, c, d, e, f, g, h;
 206   volatile int si;
 207   volatile unsigned int ui;
 208   volatile long long sll;
 209   volatile unsigned long long ull;
 210
 211   TESTVAL_NONNEG (10000049, SUFFIX, sizeof (TYPE));
 212   TESTVAL_NONNEG (10000050, SUFFIX, sizeof (TYPE));
 213   TESTVAL_NONNEG (10000051, SUFFIX, sizeof (TYPE));
 214   TESTVAL_NONNEG (10000000, SUFFIX, sizeof (TYPE));
 215   TESTVAL_NONNEG (10000001, SUFFIX, sizeof (TYPE));
 216   TESTVAL_NONNEG (10000002, SUFFIX, sizeof (TYPE));
 217   TESTVAL_NONNEG (10000003, SUFFIX, sizeof (TYPE));
 218   TESTVAL_NONNEG (10000004, SUFFIX, sizeof (TYPE));
 219   TESTVAL_NONNEG (100000049, SUFFIX, sizeof (TYPE));
 220   TESTVAL_NONNEG (100000051, SUFFIX, sizeof (TYPE));
 221   TESTVAL_NONNEG (10000006, SUFFIX, sizeof (TYPE));
 222   TESTVAL_NONNEG (10000007, SUFFIX, sizeof (TYPE));
 223   TESTVAL_NONNEG (10000008, SUFFIX, sizeof (TYPE));
 224   TESTVAL_NONNEG (10000009, SUFFIX, sizeof (TYPE));
 225   TESTVAL_NONNEG (10000010, SUFFIX, sizeof (TYPE));
 226
 227   TESTVAL_NEG (-10000049, SUFFIX, sizeof (TYPE));
 228   TESTVAL_NEG (-10000050, SUFFIX, sizeof (TYPE));
 229   TESTVAL_NEG (-10000051, SUFFIX, sizeof (TYPE));
 230   TESTVAL_NEG (-10000000, SUFFIX, sizeof (TYPE));
 231   TESTVAL_NEG (-10000001, SUFFIX, sizeof (TYPE));
 232   TESTVAL_NEG (-10000002, SUFFIX, sizeof (TYPE));
 233   TESTVAL_NEG (-10000003, SUFFIX, sizeof (TYPE));
 234   TESTVAL_NEG (-10000004, SUFFIX, sizeof (TYPE));
 235   TESTVAL_NEG (-100000049, SUFFIX, sizeof (TYPE));
 236   TESTVAL_NEG (-100000051, SUFFIX, sizeof (TYPE));
 237   TESTVAL_NEG (-10000006, SUFFIX, sizeof (TYPE));
 238   TESTVAL_NEG (-10000007, SUFFIX, sizeof (TYPE));
 239   TESTVAL_NEG (-10000008, SUFFIX, sizeof (TYPE));
 240   TESTVAL_NEG (-10000009, SUFFIX, sizeof (TYPE));
 241   TESTVAL_NEG (-10000010, SUFFIX, sizeof (TYPE));
 242 }
 243
 244 #undef SUFFIX
 245 #define SUFFIX DD
 246 #undef TYPE
 247 #define TYPE _Decimal64
 248
 249 void
 250 zeroes_64 (void)
 251 {
 252   volatile TYPE x, a, b, c, d, e, f, g, h;
 253   volatile int si;
 254   volatile unsigned int ui;
 255   volatile long long sll;
 256   volatile unsigned long long ull;
 257
 258   TESTVAL_NONNEG (0, SUFFIX, sizeof (TYPE));
 259   TESTVAL_NONNEG (1, SUFFIX, sizeof (TYPE));
 260   TESTVAL_NONNEG (5, SUFFIX, sizeof (TYPE));
 261   TESTVAL_NONNEG (9, SUFFIX, sizeof (TYPE));
 262   TESTVAL_NONNEG (10, SUFFIX, sizeof (TYPE));
 263   TESTVAL_NONNEG (50, SUFFIX, sizeof (TYPE));
 264   TESTVAL_NONNEG (90, SUFFIX, sizeof (TYPE));
 265   TESTVAL_NONNEG (100, SUFFIX, sizeof (TYPE));
 266   TESTVAL_NONNEG (500, SUFFIX, sizeof (TYPE));
 267   TESTVAL_NONNEG (900, SUFFIX, sizeof (TYPE));
 268   TESTVAL_NONNEG (1000, SUFFIX, sizeof (TYPE));
 269   TESTVAL_NONNEG (5000, SUFFIX, sizeof (TYPE));
 270   TESTVAL_NONNEG (9000, SUFFIX, sizeof (TYPE));
 271   TESTVAL_NONNEG (10000, SUFFIX, sizeof (TYPE));
 272   TESTVAL_NONNEG (50000, SUFFIX, sizeof (TYPE));
 273   TESTVAL_NONNEG (90000, SUFFIX, sizeof (TYPE));
 274   TESTVAL_NONNEG (100000, SUFFIX, sizeof (TYPE));
 275   TESTVAL_NONNEG (500000, SUFFIX, sizeof (TYPE));
 276   TESTVAL_NONNEG (900000, SUFFIX, sizeof (TYPE));
 277   TESTVAL_NONNEG (1000000, SUFFIX, sizeof (TYPE));
 278   TESTVAL_NONNEG (5000000, SUFFIX, sizeof (TYPE));
 279   TESTVAL_NONNEG (9000000, SUFFIX, sizeof (TYPE));
 280   TESTVAL_NONNEG (10000000, SUFFIX, sizeof (TYPE));
 281   TESTVAL_NONNEG (50000000, SUFFIX, sizeof (TYPE));
 282   TESTVAL_NONNEG (90000000, SUFFIX, sizeof (TYPE));
 283   TESTVAL_NONNEG (100000000, SUFFIX, sizeof (TYPE));
 284   TESTVAL_NONNEG (500000000, SUFFIX, sizeof (TYPE));
 285   TESTVAL_NONNEG (900000000, SUFFIX, sizeof (TYPE));
 286   TESTVAL_NONNEG (1000000000, SUFFIX, sizeof (TYPE));
 287   TESTVAL_NONNEG_BIG (5000000000, SUFFIX, sizeof (TYPE));
 288   TESTVAL_NONNEG_BIG (9000000000, SUFFIX, sizeof (TYPE));
 289   TESTVAL_NONNEG_BIG (10000000000, SUFFIX, sizeof (TYPE));
 290   TESTVAL_NONNEG_BIG (50000000000, SUFFIX, sizeof (TYPE));
 291   TESTVAL_NONNEG_BIG (90000000000, SUFFIX, sizeof (TYPE));
 292   TESTVAL_NONNEG_BIG (100000000000, SUFFIX, sizeof (TYPE));
 293   TESTVAL_NONNEG_BIG (500000000000, SUFFIX, sizeof (TYPE));
 294   TESTVAL_NONNEG_BIG (900000000000, SUFFIX, sizeof (TYPE));
 295   TESTVAL_NONNEG_BIG (1000000000000, SUFFIX, sizeof (TYPE));
 296   TESTVAL_NONNEG_BIG (5000000000000, SUFFIX, sizeof (TYPE));
 297   TESTVAL_NONNEG_BIG (9000000000000, SUFFIX, sizeof (TYPE));
 298   TESTVAL_NONNEG_BIG (10000000000000, SUFFIX, sizeof (TYPE));
 299   TESTVAL_NONNEG_BIG (50000000000000, SUFFIX, sizeof (TYPE));
 300   TESTVAL_NONNEG_BIG (90000000000000, SUFFIX, sizeof (TYPE));
 301   TESTVAL_NONNEG_BIG (100000000000000, SUFFIX, sizeof (TYPE));
 302   TESTVAL_NONNEG_BIG (500000000000000, SUFFIX, sizeof (TYPE));
 303   TESTVAL_NONNEG_BIG (900000000000000, SUFFIX, sizeof (TYPE));
 304   TESTVAL_NONNEG_BIG (1000000000000000, SUFFIX, sizeof (TYPE));
 305   TESTVAL_NONNEG_BIG (5000000000000000, SUFFIX, sizeof (TYPE));
 306   TESTVAL_NONNEG_BIG (9000000000000000, SUFFIX, sizeof (TYPE));
 307   TESTVAL_NONNEG_BIG (10000000000000000, SUFFIX, sizeof (TYPE));
 308   TESTVAL_NONNEG_BIG (50000000000000000, SUFFIX, sizeof (TYPE));
 309   TESTVAL_NONNEG_BIG (90000000000000000, SUFFIX, sizeof (TYPE));
 310   TESTVAL_NONNEG_BIG (100000000000000000, SUFFIX, sizeof (TYPE));
 311   TESTVAL_NONNEG_BIG (500000000000000000, SUFFIX, sizeof (TYPE));
 312   TESTVAL_NONNEG_BIG (900000000000000000, SUFFIX, sizeof (TYPE));
 313   TESTVAL_NONNEG_BIG (1000000000000000000, SUFFIX, sizeof (TYPE));
 314   TESTVAL_NONNEG_BIG (5000000000000000000, SUFFIX, sizeof (TYPE));
 315   TESTVAL_NONNEG_BIG (9000000000000000000, SUFFIX, sizeof (TYPE));
 316
 317   TESTVAL_NEG (0, SUFFIX, sizeof (TYPE));
 318   TESTVAL_NEG (-1, SUFFIX, sizeof (TYPE));
 319   TESTVAL_NEG (-5, SUFFIX, sizeof (TYPE));
 320   TESTVAL_NEG (-9, SUFFIX, sizeof (TYPE));
 321   TESTVAL_NEG (-10, SUFFIX, sizeof (TYPE));
 322   TESTVAL_NEG (-50, SUFFIX, sizeof (TYPE));
 323   TESTVAL_NEG (-90, SUFFIX, sizeof (TYPE));
 324   TESTVAL_NEG (-100, SUFFIX, sizeof (TYPE));
 325   TESTVAL_NEG (-500, SUFFIX, sizeof (TYPE));
 326   TESTVAL_NEG (-900, SUFFIX, sizeof (TYPE));
 327   TESTVAL_NEG (-1000, SUFFIX, sizeof (TYPE));
 328   TESTVAL_NEG (-5000, SUFFIX, sizeof (TYPE));
 329   TESTVAL_NEG (-9000, SUFFIX, sizeof (TYPE));
 330   TESTVAL_NEG (-10000, SUFFIX, sizeof (TYPE));
 331   TESTVAL_NEG (-50000, SUFFIX, sizeof (TYPE));
 332   TESTVAL_NEG (-90000, SUFFIX, sizeof (TYPE));
 333   TESTVAL_NEG (-100000, SUFFIX, sizeof (TYPE));
 334   TESTVAL_NEG (-500000, SUFFIX, sizeof (TYPE));
 335   TESTVAL_NEG (-900000, SUFFIX, sizeof (TYPE));
 336   TESTVAL_NEG (-1000000, SUFFIX, sizeof (TYPE));
 337   TESTVAL_NEG (-5000000, SUFFIX, sizeof (TYPE));
 338   TESTVAL_NEG (-9000000, SUFFIX, sizeof (TYPE));
 339   TESTVAL_NEG (-10000000, SUFFIX, sizeof (TYPE));
 340   TESTVAL_NEG (-50000000, SUFFIX, sizeof (TYPE));
 341   TESTVAL_NEG (-90000000, SUFFIX, sizeof (TYPE));
 342   TESTVAL_NEG (-100000000, SUFFIX, sizeof (TYPE));
 343   TESTVAL_NEG (-500000000, SUFFIX, sizeof (TYPE));
 344   TESTVAL_NEG (-900000000, SUFFIX, sizeof (TYPE));
 345   TESTVAL_NEG (-1000000000, SUFFIX, sizeof (TYPE));
 346   TESTVAL_NEG_BIG (-5000000000, SUFFIX, sizeof (TYPE));
 347   TESTVAL_NEG_BIG (-9000000000, SUFFIX, sizeof (TYPE));
 348   TESTVAL_NEG_BIG (-10000000000, SUFFIX, sizeof (TYPE));
 349   TESTVAL_NEG_BIG (-50000000000, SUFFIX, sizeof (TYPE));
 350   TESTVAL_NEG_BIG (-90000000000, SUFFIX, sizeof (TYPE));
 351   TESTVAL_NEG_BIG (-100000000000, SUFFIX, sizeof (TYPE));
 352   TESTVAL_NEG_BIG (-500000000000, SUFFIX, sizeof (TYPE));
 353   TESTVAL_NEG_BIG (-900000000000, SUFFIX, sizeof (TYPE));
 354   TESTVAL_NEG_BIG (-1000000000000, SUFFIX, sizeof (TYPE));
 355   TESTVAL_NEG_BIG (-5000000000000, SUFFIX, sizeof (TYPE));
 356   TESTVAL_NEG_BIG (-9000000000000, SUFFIX, sizeof (TYPE));
 357   TESTVAL_NEG_BIG (-10000000000000, SUFFIX, sizeof (TYPE));
 358   TESTVAL_NEG_BIG (-50000000000000, SUFFIX, sizeof (TYPE));
 359   TESTVAL_NEG_BIG (-90000000000000, SUFFIX, sizeof (TYPE));
 360   TESTVAL_NEG_BIG (-100000000000000, SUFFIX, sizeof (TYPE));
 361   TESTVAL_NEG_BIG (-500000000000000, SUFFIX, sizeof (TYPE));
 362   TESTVAL_NEG_BIG (-900000000000000, SUFFIX, sizeof (TYPE));
 363   TESTVAL_NEG_BIG (-1000000000000000, SUFFIX, sizeof (TYPE));
 364   TESTVAL_NEG_BIG (-5000000000000000, SUFFIX, sizeof (TYPE));
 365   TESTVAL_NEG_BIG (-9000000000000000, SUFFIX, sizeof (TYPE));
 366   TESTVAL_NEG_BIG (-10000000000000000, SUFFIX, sizeof (TYPE));
 367   TESTVAL_NEG_BIG (-50000000000000000, SUFFIX, sizeof (TYPE));
 368   TESTVAL_NEG_BIG (-90000000000000000, SUFFIX, sizeof (TYPE));
 369   TESTVAL_NEG_BIG (-100000000000000000, SUFFIX, sizeof (TYPE));
 370   TESTVAL_NEG_BIG (-500000000000000000, SUFFIX, sizeof (TYPE));
 371   TESTVAL_NEG_BIG (-900000000000000000, SUFFIX, sizeof (TYPE));
 372   TESTVAL_NEG_BIG (-1000000000000000000, SUFFIX, sizeof (TYPE));
 373   TESTVAL_NEG_BIG (-5000000000000000000, SUFFIX, sizeof (TYPE));
 374   TESTVAL_NEG_BIG (-9000000000000000000, SUFFIX, sizeof (TYPE));
 375 }
 376
 377 void
 378 round_64 (void)
 379 {
 380   volatile TYPE x, a, b, c, d, e, f, g, h;
 381   volatile int si;
 382   volatile unsigned int ui;
 383   volatile long long sll;
 384   volatile unsigned long long ull;
 385
 386   TESTVAL_NONNEG_BIG (10000000000000000, SUFFIX, sizeof (TYPE));
 387   TESTVAL_NONNEG_BIG (10000000000000001, SUFFIX, sizeof (TYPE));
 388   TESTVAL_NONNEG_BIG (10000000000000002, SUFFIX, sizeof (TYPE));
 389   TESTVAL_NONNEG_BIG (10000000000000003, SUFFIX, sizeof (TYPE));
 390   TESTVAL_NONNEG_BIG (10000000000000004, SUFFIX, sizeof (TYPE));
 391   TESTVAL_NONNEG_BIG (100000000000000049, SUFFIX, sizeof (TYPE));
 392   TESTVAL_NONNEG_BIG (100000000000000051, SUFFIX, sizeof (TYPE));
 393   TESTVAL_NONNEG_BIG (10000000000000006, SUFFIX, sizeof (TYPE));
 394   TESTVAL_NONNEG_BIG (10000000000000007, SUFFIX, sizeof (TYPE));
 395   TESTVAL_NONNEG_BIG (10000000000000008, SUFFIX, sizeof (TYPE));
 396   TESTVAL_NONNEG_BIG (10000000000000009, SUFFIX, sizeof (TYPE));
 397   TESTVAL_NONNEG_BIG (10000000000000010, SUFFIX, sizeof (TYPE));
 398
 399   TESTVAL_NEG_BIG (-10000000000000000, SUFFIX, sizeof (TYPE));
 400   TESTVAL_NEG_BIG (-10000000000000001, SUFFIX, sizeof (TYPE));
 401   TESTVAL_NEG_BIG (-10000000000000002, SUFFIX, sizeof (TYPE));
 402   TESTVAL_NEG_BIG (-10000000000000003, SUFFIX, sizeof (TYPE));
 403   TESTVAL_NEG_BIG (-10000000000000004, SUFFIX, sizeof (TYPE));
 404   TESTVAL_NEG_BIG (-100000000000000049, SUFFIX, sizeof (TYPE));
 405   TESTVAL_NEG_BIG (-100000000000000051, SUFFIX, sizeof (TYPE));
 406   TESTVAL_NEG_BIG (-10000000000000006, SUFFIX, sizeof (TYPE));
 407   TESTVAL_NEG_BIG (-10000000000000007, SUFFIX, sizeof (TYPE));
 408   TESTVAL_NEG_BIG (-10000000000000008, SUFFIX, sizeof (TYPE));
 409   TESTVAL_NEG_BIG (-10000000000000009, SUFFIX, sizeof (TYPE));
 410   TESTVAL_NEG_BIG (-10000000000000010, SUFFIX, sizeof (TYPE));
 411 }
 412
 413 #undef SUFFIX
 414 #define SUFFIX DL
 415 #undef TYPE
 416 #define TYPE _Decimal128
 417
 418 void
 419 zeroes_128 (void)
 420 {
 421   volatile TYPE x, a, b, c, d, e, f, g, h;
 422   volatile int si;
 423   volatile unsigned int ui;
 424   volatile long long sll;
 425   volatile unsigned long long ull;
 426
 427   TESTVAL_NONNEG (0, SUFFIX, sizeof (TYPE));
 428   TESTVAL_NONNEG (1, SUFFIX, sizeof (TYPE));
 429   TESTVAL_NONNEG (5, SUFFIX, sizeof (TYPE));
 430   TESTVAL_NONNEG (9, SUFFIX, sizeof (TYPE));
 431   TESTVAL_NONNEG (10, SUFFIX, sizeof (TYPE));
 432   TESTVAL_NONNEG (50, SUFFIX, sizeof (TYPE));
 433   TESTVAL_NONNEG (90, SUFFIX, sizeof (TYPE));
 434   TESTVAL_NONNEG (100, SUFFIX, sizeof (TYPE));
 435   TESTVAL_NONNEG (500, SUFFIX, sizeof (TYPE));
 436   TESTVAL_NONNEG (900, SUFFIX, sizeof (TYPE));
 437   TESTVAL_NONNEG (1000, SUFFIX, sizeof (TYPE));
 438   TESTVAL_NONNEG (5000, SUFFIX, sizeof (TYPE));
 439   TESTVAL_NONNEG (9000, SUFFIX, sizeof (TYPE));
 440   TESTVAL_NONNEG (10000, SUFFIX, sizeof (TYPE));
 441   TESTVAL_NONNEG (50000, SUFFIX, sizeof (TYPE));
 442   TESTVAL_NONNEG (90000, SUFFIX, sizeof (TYPE));
 443   TESTVAL_NONNEG (100000, SUFFIX, sizeof (TYPE));
 444   TESTVAL_NONNEG (500000, SUFFIX, sizeof (TYPE));
 445   TESTVAL_NONNEG (900000, SUFFIX, sizeof (TYPE));
 446   TESTVAL_NONNEG (1000000, SUFFIX, sizeof (TYPE));
 447   TESTVAL_NONNEG (5000000, SUFFIX, sizeof (TYPE));
 448   TESTVAL_NONNEG (9000000, SUFFIX, sizeof (TYPE));
 449   TESTVAL_NONNEG (10000000, SUFFIX, sizeof (TYPE));
 450   TESTVAL_NONNEG (50000000, SUFFIX, sizeof (TYPE));
 451   TESTVAL_NONNEG (90000000, SUFFIX, sizeof (TYPE));
 452   TESTVAL_NONNEG (100000000, SUFFIX, sizeof (TYPE));
 453   TESTVAL_NONNEG (500000000, SUFFIX, sizeof (TYPE));
 454   TESTVAL_NONNEG (900000000, SUFFIX, sizeof (TYPE));
 455   TESTVAL_NONNEG (1000000000, SUFFIX, sizeof (TYPE));
 456   TESTVAL_NONNEG_BIG (5000000000, SUFFIX, sizeof (TYPE));
 457   TESTVAL_NONNEG_BIG (9000000000, SUFFIX, sizeof (TYPE));
 458   TESTVAL_NONNEG_BIG (10000000000, SUFFIX, sizeof (TYPE));
 459   TESTVAL_NONNEG_BIG (50000000000, SUFFIX, sizeof (TYPE));
 460   TESTVAL_NONNEG_BIG (90000000000, SUFFIX, sizeof (TYPE));
 461   TESTVAL_NONNEG_BIG (100000000000, SUFFIX, sizeof (TYPE));
 462   TESTVAL_NONNEG_BIG (500000000000, SUFFIX, sizeof (TYPE));
 463   TESTVAL_NONNEG_BIG (900000000000, SUFFIX, sizeof (TYPE));
 464   TESTVAL_NONNEG_BIG (1000000000000, SUFFIX, sizeof (TYPE));
 465   TESTVAL_NONNEG_BIG (5000000000000, SUFFIX, sizeof (TYPE));
 466   TESTVAL_NONNEG_BIG (9000000000000, SUFFIX, sizeof (TYPE));
 467   TESTVAL_NONNEG_BIG (10000000000000, SUFFIX, sizeof (TYPE));
 468   TESTVAL_NONNEG_BIG (50000000000000, SUFFIX, sizeof (TYPE));
 469   TESTVAL_NONNEG_BIG (90000000000000, SUFFIX, sizeof (TYPE));
 470   TESTVAL_NONNEG_BIG (100000000000000, SUFFIX, sizeof (TYPE));
 471   TESTVAL_NONNEG_BIG (500000000000000, SUFFIX, sizeof (TYPE));
 472   TESTVAL_NONNEG_BIG (900000000000000, SUFFIX, sizeof (TYPE));
 473   TESTVAL_NONNEG_BIG (1000000000000000, SUFFIX, sizeof (TYPE));
 474   TESTVAL_NONNEG_BIG (5000000000000000, SUFFIX, sizeof (TYPE));
 475   TESTVAL_NONNEG_BIG (9000000000000000, SUFFIX, sizeof (TYPE));
 476   TESTVAL_NONNEG_BIG (10000000000000000, SUFFIX, sizeof (TYPE));
 477   TESTVAL_NONNEG_BIG (50000000000000000, SUFFIX, sizeof (TYPE));
 478   TESTVAL_NONNEG_BIG (90000000000000000, SUFFIX, sizeof (TYPE));
 479   TESTVAL_NONNEG_BIG (100000000000000000, SUFFIX, sizeof (TYPE));
 480   TESTVAL_NONNEG_BIG (500000000000000000, SUFFIX, sizeof (TYPE));
 481   TESTVAL_NONNEG_BIG (900000000000000000, SUFFIX, sizeof (TYPE));
 482   TESTVAL_NONNEG_BIG (1000000000000000000, SUFFIX, sizeof (TYPE));
 483   TESTVAL_NONNEG_BIG (5000000000000000000, SUFFIX, sizeof (TYPE));
 484   TESTVAL_NONNEG_BIG (9000000000000000000, SUFFIX, sizeof (TYPE));
 485
 486   TESTVAL_NEG (0, SUFFIX, sizeof (TYPE));
 487   TESTVAL_NEG (-1, SUFFIX, sizeof (TYPE));
 488   TESTVAL_NEG (-5, SUFFIX, sizeof (TYPE));
 489   TESTVAL_NEG (-9, SUFFIX, sizeof (TYPE));
 490   TESTVAL_NEG (-10, SUFFIX, sizeof (TYPE));
 491   TESTVAL_NEG (-50, SUFFIX, sizeof (TYPE));
 492   TESTVAL_NEG (-90, SUFFIX, sizeof (TYPE));
 493   TESTVAL_NEG (-100, SUFFIX, sizeof (TYPE));
 494   TESTVAL_NEG (-500, SUFFIX, sizeof (TYPE));
 495   TESTVAL_NEG (-900, SUFFIX, sizeof (TYPE));
 496   TESTVAL_NEG (-1000, SUFFIX, sizeof (TYPE));
 497   TESTVAL_NEG (-5000, SUFFIX, sizeof (TYPE));
 498   TESTVAL_NEG (-9000, SUFFIX, sizeof (TYPE));
 499   TESTVAL_NEG (-10000, SUFFIX, sizeof (TYPE));
 500   TESTVAL_NEG (-50000, SUFFIX, sizeof (TYPE));
 501   TESTVAL_NEG (-90000, SUFFIX, sizeof (TYPE));
 502   TESTVAL_NEG (-100000, SUFFIX, sizeof (TYPE));
 503   TESTVAL_NEG (-500000, SUFFIX, sizeof (TYPE));
 504   TESTVAL_NEG (-900000, SUFFIX, sizeof (TYPE));
 505   TESTVAL_NEG (-1000000, SUFFIX, sizeof (TYPE));
 506   TESTVAL_NEG (-5000000, SUFFIX, sizeof (TYPE));
 507   TESTVAL_NEG (-9000000, SUFFIX, sizeof (TYPE));
 508   TESTVAL_NEG (-10000000, SUFFIX, sizeof (TYPE));
 509   TESTVAL_NEG (-50000000, SUFFIX, sizeof (TYPE));
 510   TESTVAL_NEG (-90000000, SUFFIX, sizeof (TYPE));
 511   TESTVAL_NEG (-100000000, SUFFIX, sizeof (TYPE));
 512   TESTVAL_NEG (-500000000, SUFFIX, sizeof (TYPE));
 513   TESTVAL_NEG (-900000000, SUFFIX, sizeof (TYPE));
 514   TESTVAL_NEG (-1000000000, SUFFIX, sizeof (TYPE));
 515   TESTVAL_NEG_BIG (-5000000000, SUFFIX, sizeof (TYPE));
 516   TESTVAL_NEG_BIG (-9000000000, SUFFIX, sizeof (TYPE));
 517   TESTVAL_NEG_BIG (-10000000000, SUFFIX, sizeof (TYPE));
 518   TESTVAL_NEG_BIG (-50000000000, SUFFIX, sizeof (TYPE));
 519   TESTVAL_NEG_BIG (-90000000000, SUFFIX, sizeof (TYPE));
 520   TESTVAL_NEG_BIG (-100000000000, SUFFIX, sizeof (TYPE));
 521   TESTVAL_NEG_BIG (-500000000000, SUFFIX, sizeof (TYPE));
 522   TESTVAL_NEG_BIG (-900000000000, SUFFIX, sizeof (TYPE));
 523   TESTVAL_NEG_BIG (-1000000000000, SUFFIX, sizeof (TYPE));
 524   TESTVAL_NEG_BIG (-5000000000000, SUFFIX, sizeof (TYPE));
 525   TESTVAL_NEG_BIG (-9000000000000, SUFFIX, sizeof (TYPE));
 526   TESTVAL_NEG_BIG (-10000000000000, SUFFIX, sizeof (TYPE));
 527   TESTVAL_NEG_BIG (-50000000000000, SUFFIX, sizeof (TYPE));
 528   TESTVAL_NEG_BIG (-90000000000000, SUFFIX, sizeof (TYPE));
 529   TESTVAL_NEG_BIG (-100000000000000, SUFFIX, sizeof (TYPE));
 530   TESTVAL_NEG_BIG (-500000000000000, SUFFIX, sizeof (TYPE));
 531   TESTVAL_NEG_BIG (-900000000000000, SUFFIX, sizeof (TYPE));
 532   TESTVAL_NEG_BIG (-1000000000000000, SUFFIX, sizeof (TYPE));
 533   TESTVAL_NEG_BIG (-5000000000000000, SUFFIX, sizeof (TYPE));
 534   TESTVAL_NEG_BIG (-9000000000000000, SUFFIX, sizeof (TYPE));
 535   TESTVAL_NEG_BIG (-10000000000000000, SUFFIX, sizeof (TYPE));
 536   TESTVAL_NEG_BIG (-50000000000000000, SUFFIX, sizeof (TYPE));
 537   TESTVAL_NEG_BIG (-90000000000000000, SUFFIX, sizeof (TYPE));
 538   TESTVAL_NEG_BIG (-100000000000000000, SUFFIX, sizeof (TYPE));
 539   TESTVAL_NEG_BIG (-500000000000000000, SUFFIX, sizeof (TYPE));
 540   TESTVAL_NEG_BIG (-900000000000000000, SUFFIX, sizeof (TYPE));
 541   TESTVAL_NEG_BIG (-1000000000000000000, SUFFIX, sizeof (TYPE));
 542   TESTVAL_NEG_BIG (-5000000000000000000, SUFFIX, sizeof (TYPE));
 543   TESTVAL_NEG_BIG (-9000000000000000000, SUFFIX, sizeof (TYPE));
 544 }
 545
 546
 547 int
 548 main ()
 549 {
 550   zeroes_32 ();
 551   zeroes_64 ();
 552   zeroes_128 ();
 553   round_32 ();
 554   round_64 ();
 555
 556   return 0;
 557 }