1  typedef unsigned long long ull;
       2  volatile int gvol[32];
       3  ull gull;
       4  
       5  #define MULTI(X) \
       6  	X( 1), X( 2), X( 3), X( 4), X( 5), X( 6), X( 7), X( 8), X( 9), X(10), \
       7  	X(11), X(12), X(13), X(14), X(15), X(16), X(17), X(18), X(19), X(20), \
       8  	X(21), X(22), X(23), X(24), X(25), X(26), X(27), X(28), X(29), X(30)
       9  
      10  #define DECLARE(INDEX) x##INDEX
      11  #define COPYIN(INDEX) x##INDEX = gvol[INDEX]
      12  #define COPYOUT(INDEX) gvol[INDEX] = x##INDEX
      13  
      14  #define BUILD_TEST(NAME, N)		\
      15    ull __attribute__((noinline))		\
      16    NAME (int n, ull x)			\
      17    {					\
      18      while (n--)				\
      19        {					\
      20  	int MULTI (DECLARE);		\
      21  	MULTI (COPYIN);			\
      22  	MULTI (COPYOUT);		\
      23  	x += N;				\
      24        }					\
      25      return x;				\
      26    }
      27  
      28  #define RUN_TEST(NAME, N)		\
      29    if (NAME (3, ~0ULL) != N * 3 - 1)	\
      30      abort ();				\
      31    if (NAME (3, 0xffffffffULL)		\
      32        != N * 3 + 0xffffffffULL)		\
      33      abort ();
      34  
      35  #define DO_TESTS(DO_TEST)	\
      36    DO_TEST (t1, -2048)		\
      37    DO_TEST (t2, -513)		\
      38    DO_TEST (t3, -512)		\
      39    DO_TEST (t4, -511)		\
      40    DO_TEST (t5, -1)		\
      41    DO_TEST (t6, 1)		\
      42    DO_TEST (t7, 511)		\
      43    DO_TEST (t8, 512)		\
      44    DO_TEST (t9, 513)		\
      45    DO_TEST (t10, gull)		\
      46    DO_TEST (t11, -gull)
      47  
      48  DO_TESTS (BUILD_TEST)
      49  
      50  ull neg (ull x) { return -x; }
      51  
      52  int
      53  main ()
      54  {
      55    gull = 100;
      56    DO_TESTS (RUN_TEST)
      57    if (neg (gull) != -100ULL)
      58      abort ();
      59    exit (0);
      60  }