(root)/
gcc-13.2.0/
gcc/
testsuite/
gcc.dg/
c90-intconst-1.c
       1  /* Test for integer constant types.  */
       2  
       3  /* Origin: Joseph Myers <jsm28@cam.ac.uk>.  */
       4  /* { dg-do compile } */
       5  /* { dg-options "-std=iso9899:1990 -pedantic-errors" } */
       6  
       7  #include <limits.h>
       8  
       9  /* Assertion that constant C is of type T.  */
      10  #define ASSERT_CONST_TYPE(C, T)			\
      11  	do {					\
      12  	  typedef T type;			\
      13  	  typedef type **typepp;		\
      14  	  typedef __typeof__((C)) ctype;	\
      15  	  typedef ctype **ctypepp;		\
      16  	  typepp x = 0;				\
      17  	  ctypepp y = 0;			\
      18  	  x = y;				\
      19  	  y = x;				\
      20  	} while (0)
      21  
      22  /* (T *) if E is zero, (void *) otherwise.  */
      23  #define type_if_not(T, E) __typeof__(0 ? (T *)0 : (void *)(E))
      24  
      25  /* (T *) if E is nonzero, (void *) otherwise.  */
      26  #define type_if(T, E) type_if_not(T, !(E))
      27  
      28  /* Combine pointer types, all but one (void *).  */
      29  #define type_comb2(T1, T2) __typeof__(0 ? (T1)0 : (T2)0)
      30  #define type_comb3(T1, T2, T3) type_comb2(T1, type_comb2(T2, T3))
      31  #define type_comb4(T1, T2, T3, T4)				\
      32  	type_comb2(T1, type_comb2(T2, type_comb2(T3, T4)))
      33  
      34  /* (T1 *) if E1, otherwise (T2 *) if E2.  */
      35  #define first_of2p(T1, E1, T2, E2) type_comb2(type_if(T1, (E1)),	   \
      36  					     type_if(T2, (!(E1) && (E2))))
      37  /* (T1 *) if E1, otherwise (T2 *) if E2, otherwise (T3 *) if E3.  */
      38  #define first_of3p(T1, E1, T2, E2, T3, E3)			\
      39  	type_comb3(type_if(T1, (E1)),				\
      40  		   type_if(T2, (!(E1) && (E2))),		\
      41  		   type_if(T3, (!(E1) && !(E2) && (E3))))
      42  /* (T1 *) if E1, otherwise (T2 *) if E2, otherwise (T3 *) if E3, otherwise
      43     (T4 *) if E4.  */
      44  #define first_of4p(T1, E1, T2, E2, T3, E3, T4, E4)			\
      45  	type_comb4(type_if(T1, (E1)),					\
      46  		   type_if(T2, (!(E1) && (E2))),			\
      47  		   type_if(T3, (!(E1) && !(E2) && (E3))),		\
      48  		   type_if(T4, (!(E1) && !(E2) && !(E3) && (E4))))
      49  
      50  /* Likewise, but return the original type rather than a pointer type.  */
      51  #define first_of2(T1, E1, T2, E2)			\
      52  	__typeof__(*((first_of2p(T1, (E1), T2, (E2)))0))
      53  #define first_of3(T1, E1, T2, E2, T3, E3)				\
      54  	__typeof__(*((first_of3p(T1, (E1), T2, (E2), T3, (E3)))0))
      55  #define first_of4(T1, E1, T2, E2, T3, E3, T4, E4)			    \
      56  	__typeof__(*((first_of4p(T1, (E1), T2, (E2), T3, (E3), T4, (E4)))0))
      57  
      58  /* Types of constants according to the C90 rules.  */
      59  #define C90_UNSUF_DEC_TYPE(C)				\
      60  	first_of3(int, (C) <= INT_MAX,			\
      61  		  long int, (C) <= LONG_MAX,		\
      62  		  unsigned long int, (C) <= ULONG_MAX)
      63  #define C90_UNSUF_OCTHEX_TYPE(C)			\
      64  	first_of4(int, (C) <= INT_MAX,			\
      65  		  unsigned int, (C) <= UINT_MAX,	\
      66  		  long int, (C) <= LONG_MAX,		\
      67  		  unsigned long int, (C) <= ULONG_MAX)
      68  #define C90_SUFu_TYPE(C)				\
      69  	first_of2(unsigned int, (C) <= UINT_MAX,	\
      70  		  unsigned long int, (C) <= ULONG_MAX)
      71  #define C90_SUFl_TYPE(C)				\
      72  	first_of2(long int, (C) <= LONG_MAX,		\
      73  		  unsigned long int, (C) <= ULONG_MAX)
      74  
      75  /* Checks that constants have correct type.  */
      76  #define CHECK_UNSUF_DEC_TYPE(C) ASSERT_CONST_TYPE((C), C90_UNSUF_DEC_TYPE((C)))
      77  #define CHECK_UNSUF_OCTHEX_TYPE(C)				\
      78  	ASSERT_CONST_TYPE((C), C90_UNSUF_OCTHEX_TYPE((C)))
      79  #define CHECK_SUFu_TYPE(C) ASSERT_CONST_TYPE((C), C90_SUFu_TYPE((C)))
      80  #define CHECK_SUFl_TYPE(C) ASSERT_CONST_TYPE((C), C90_SUFl_TYPE((C)))
      81  #define CHECK_SUFul_TYPE(C) ASSERT_CONST_TYPE((C), unsigned long int)
      82  
      83  /* Check a decimal value, with all suffixes.  */
      84  #define CHECK_DEC_CONST(C)			\
      85  	CHECK_UNSUF_DEC_TYPE(C);		\
      86  	CHECK_SUFu_TYPE(C##u);			\
      87  	CHECK_SUFu_TYPE(C##U);			\
      88  	CHECK_SUFl_TYPE(C##l);			\
      89  	CHECK_SUFl_TYPE(C##L);			\
      90  	CHECK_SUFul_TYPE(C##ul);		\
      91  	CHECK_SUFul_TYPE(C##uL);		\
      92  	CHECK_SUFul_TYPE(C##Ul);		\
      93  	CHECK_SUFul_TYPE(C##UL);
      94  
      95  /* Check an octal or hexadecimal value, with all suffixes.  */
      96  #define CHECK_OCTHEX_CONST(C)			\
      97  	CHECK_UNSUF_OCTHEX_TYPE(C);		\
      98  	CHECK_SUFu_TYPE(C##u);			\
      99  	CHECK_SUFu_TYPE(C##U);			\
     100  	CHECK_SUFl_TYPE(C##l);			\
     101  	CHECK_SUFl_TYPE(C##L);			\
     102  	CHECK_SUFul_TYPE(C##ul);		\
     103  	CHECK_SUFul_TYPE(C##uL);		\
     104  	CHECK_SUFul_TYPE(C##Ul);		\
     105  	CHECK_SUFul_TYPE(C##UL);
     106  
     107  #define CHECK_OCT_CONST(C) CHECK_OCTHEX_CONST(C)
     108  #define CHECK_HEX_CONST(C)			\
     109  	CHECK_OCTHEX_CONST(0x##C);		\
     110  	CHECK_OCTHEX_CONST(0X##C);
     111  
     112  /* True iff "long" is at least B bits.  This presumes that (B-2)/3 is at
     113     most 31.  */
     114  #define LONG_AT_LEAST(B)						\
     115  	(LONG_MAX >> ((B)-2)/3 >> ((B)-2)/3 >> ((B)-2 - ((B)-2)/3 - ((B)-2)/3))
     116  
     117  #define LONG_HAS_BITS(B) (LONG_AT_LEAST((B)) && !LONG_AT_LEAST((B) + 1))
     118  
     119  /* Decimal values that are large enough to be unsigned.  Allow for up to
     120     64 bits in long.  */
     121  #if LONG_HAS_BITS(32)
     122  #define LARGE_UNSIGNED_DECIMAL 2147483648
     123  #endif
     124  #if LONG_HAS_BITS(33)
     125  #define LARGE_UNSIGNED_DECIMAL 4294967296
     126  #endif
     127  #if LONG_HAS_BITS(34)
     128  #define LARGE_UNSIGNED_DECIMAL 8589934592
     129  #endif
     130  #if LONG_HAS_BITS(35)
     131  #define LARGE_UNSIGNED_DECIMAL 17179869184
     132  #endif
     133  #if LONG_HAS_BITS(36)
     134  #define LARGE_UNSIGNED_DECIMAL 34359738368
     135  #endif
     136  #if LONG_HAS_BITS(37)
     137  #define LARGE_UNSIGNED_DECIMAL 68719476736
     138  #endif
     139  #if LONG_HAS_BITS(38)
     140  #define LARGE_UNSIGNED_DECIMAL 137438953472
     141  #endif
     142  #if LONG_HAS_BITS(39)
     143  #define LARGE_UNSIGNED_DECIMAL 274877906944
     144  #endif
     145  #if LONG_HAS_BITS(40)
     146  #define LARGE_UNSIGNED_DECIMAL 549755813888
     147  #endif
     148  #if LONG_HAS_BITS(41)
     149  #define LARGE_UNSIGNED_DECIMAL 1099511627776
     150  #endif
     151  #if LONG_HAS_BITS(42)
     152  #define LARGE_UNSIGNED_DECIMAL 2199023255552
     153  #endif
     154  #if LONG_HAS_BITS(43)
     155  #define LARGE_UNSIGNED_DECIMAL 4398046511104
     156  #endif
     157  #if LONG_HAS_BITS(44)
     158  #define LARGE_UNSIGNED_DECIMAL 8796093022208
     159  #endif
     160  #if LONG_HAS_BITS(45)
     161  #define LARGE_UNSIGNED_DECIMAL 17592186044416
     162  #endif
     163  #if LONG_HAS_BITS(46)
     164  #define LARGE_UNSIGNED_DECIMAL 35184372088832
     165  #endif
     166  #if LONG_HAS_BITS(47)
     167  #define LARGE_UNSIGNED_DECIMAL 70368744177664
     168  #endif
     169  #if LONG_HAS_BITS(48)
     170  #define LARGE_UNSIGNED_DECIMAL 140737488355328
     171  #endif
     172  #if LONG_HAS_BITS(49)
     173  #define LARGE_UNSIGNED_DECIMAL 281474976710656
     174  #endif
     175  #if LONG_HAS_BITS(50)
     176  #define LARGE_UNSIGNED_DECIMAL 562949953421312
     177  #endif
     178  #if LONG_HAS_BITS(51)
     179  #define LARGE_UNSIGNED_DECIMAL 1125899906842624
     180  #endif
     181  #if LONG_HAS_BITS(52)
     182  #define LARGE_UNSIGNED_DECIMAL 2251799813685248
     183  #endif
     184  #if LONG_HAS_BITS(53)
     185  #define LARGE_UNSIGNED_DECIMAL 4503599627370496
     186  #endif
     187  #if LONG_HAS_BITS(54)
     188  #define LARGE_UNSIGNED_DECIMAL 9007199254740992
     189  #endif
     190  #if LONG_HAS_BITS(55)
     191  #define LARGE_UNSIGNED_DECIMAL 18014398509481984
     192  #endif
     193  #if LONG_HAS_BITS(56)
     194  #define LARGE_UNSIGNED_DECIMAL 36028797018963968
     195  #endif
     196  #if LONG_HAS_BITS(57)
     197  #define LARGE_UNSIGNED_DECIMAL 72057594037927936
     198  #endif
     199  #if LONG_HAS_BITS(58)
     200  #define LARGE_UNSIGNED_DECIMAL 144115188075855872
     201  #endif
     202  #if LONG_HAS_BITS(59)
     203  #define LARGE_UNSIGNED_DECIMAL 288230376151711744
     204  #endif
     205  #if LONG_HAS_BITS(60)
     206  #define LARGE_UNSIGNED_DECIMAL 576460752303423488
     207  #endif
     208  #if LONG_HAS_BITS(61)
     209  #define LARGE_UNSIGNED_DECIMAL 1152921504606846976
     210  #endif
     211  #if LONG_HAS_BITS(62)
     212  #define LARGE_UNSIGNED_DECIMAL 2305843009213693952
     213  #endif
     214  #if LONG_HAS_BITS(63)
     215  #define LARGE_UNSIGNED_DECIMAL 4611686018427387904
     216  #endif
     217  #if LONG_HAS_BITS(64)
     218  #define LARGE_UNSIGNED_DECIMAL 9223372036854775808
     219  #endif
     220  #if LONG_AT_LEAST(65)
     221  #error "extend this test to allow for long larger than 64 bits"
     222  #endif
     223  
     224  #define cat(x, y) x ## y
     225  #define xcat(x, y) cat(x, y)
     226  
     227  #define LARGE_UNSIGNED_DECIMALl xcat(LARGE_UNSIGNED_DECIMAL, l)
     228  #define LARGE_UNSIGNED_DECIMALL xcat(LARGE_UNSIGNED_DECIMAL, L)
     229  #define LARGE_UNSIGNED_DECIMALu xcat(LARGE_UNSIGNED_DECIMAL, u)
     230  #define LARGE_UNSIGNED_DECIMALU xcat(LARGE_UNSIGNED_DECIMAL, U)
     231  #define LARGE_UNSIGNED_DECIMALul xcat(LARGE_UNSIGNED_DECIMAL, ul)
     232  #define LARGE_UNSIGNED_DECIMALuL xcat(LARGE_UNSIGNED_DECIMAL, uL)
     233  #define LARGE_UNSIGNED_DECIMALUl xcat(LARGE_UNSIGNED_DECIMAL, Ul)
     234  #define LARGE_UNSIGNED_DECIMALUL xcat(LARGE_UNSIGNED_DECIMAL, UL)
     235  
     236  void
     237  foo (void)
     238  {
     239    /* Decimal.  */
     240    /* Check all 2^n and 2^n - 1 up to 2^63 - 1.  Check values that would be
     241       unsigned separately since they generate a warning.  */
     242    CHECK_DEC_CONST(1);
     243    CHECK_DEC_CONST(2);
     244    CHECK_DEC_CONST(3);
     245    CHECK_DEC_CONST(4);
     246    CHECK_DEC_CONST(7);
     247    CHECK_DEC_CONST(8);
     248    CHECK_DEC_CONST(15);
     249    CHECK_DEC_CONST(16);
     250    CHECK_DEC_CONST(31);
     251    CHECK_DEC_CONST(32);
     252    CHECK_DEC_CONST(63);
     253    CHECK_DEC_CONST(64);
     254    CHECK_DEC_CONST(127);
     255    CHECK_DEC_CONST(128);
     256    CHECK_DEC_CONST(255);
     257    CHECK_DEC_CONST(256);
     258    CHECK_DEC_CONST(511);
     259    CHECK_DEC_CONST(512);
     260    CHECK_DEC_CONST(1023);
     261    CHECK_DEC_CONST(1024);
     262    CHECK_DEC_CONST(2047);
     263    CHECK_DEC_CONST(2048);
     264    CHECK_DEC_CONST(4095);
     265    CHECK_DEC_CONST(4096);
     266    CHECK_DEC_CONST(8191);
     267    CHECK_DEC_CONST(8192);
     268    CHECK_DEC_CONST(16383);
     269    CHECK_DEC_CONST(16384);
     270    CHECK_DEC_CONST(32767);
     271    CHECK_DEC_CONST(32768);
     272    CHECK_DEC_CONST(65535);
     273    CHECK_DEC_CONST(65536);
     274    CHECK_DEC_CONST(131071);
     275    CHECK_DEC_CONST(131072);
     276    CHECK_DEC_CONST(262143);
     277    CHECK_DEC_CONST(262144);
     278    CHECK_DEC_CONST(524287);
     279    CHECK_DEC_CONST(524288);
     280    CHECK_DEC_CONST(1048575);
     281    CHECK_DEC_CONST(1048576);
     282    CHECK_DEC_CONST(2097151);
     283    CHECK_DEC_CONST(2097152);
     284    CHECK_DEC_CONST(4194303);
     285    CHECK_DEC_CONST(4194304);
     286    CHECK_DEC_CONST(8388607);
     287    CHECK_DEC_CONST(8388608);
     288    CHECK_DEC_CONST(16777215);
     289    CHECK_DEC_CONST(16777216);
     290    CHECK_DEC_CONST(33554431);
     291    CHECK_DEC_CONST(33554432);
     292    CHECK_DEC_CONST(67108863);
     293    CHECK_DEC_CONST(67108864);
     294    CHECK_DEC_CONST(134217727);
     295    CHECK_DEC_CONST(134217728);
     296    CHECK_DEC_CONST(268435455);
     297    CHECK_DEC_CONST(268435456);
     298    CHECK_DEC_CONST(536870911);
     299    CHECK_DEC_CONST(536870912);
     300    CHECK_DEC_CONST(1073741823);
     301    CHECK_DEC_CONST(1073741824);
     302    CHECK_DEC_CONST(2147483647);
     303  #if LONG_AT_LEAST(33)
     304    CHECK_DEC_CONST(2147483648);
     305    CHECK_DEC_CONST(4294967295);
     306  #endif
     307  #if LONG_AT_LEAST(34)
     308    CHECK_DEC_CONST(4294967296);
     309    CHECK_DEC_CONST(8589934591);
     310  #endif
     311  #if LONG_AT_LEAST(35)
     312    CHECK_DEC_CONST(8589934592);
     313    CHECK_DEC_CONST(17179869183);
     314  #endif
     315  #if LONG_AT_LEAST(36)
     316    CHECK_DEC_CONST(17179869184);
     317    CHECK_DEC_CONST(34359738367);
     318  #endif
     319  #if LONG_AT_LEAST(37)
     320    CHECK_DEC_CONST(34359738368);
     321    CHECK_DEC_CONST(68719476735);
     322  #endif
     323  #if LONG_AT_LEAST(38)
     324    CHECK_DEC_CONST(68719476736);
     325    CHECK_DEC_CONST(137438953471);
     326  #endif
     327  #if LONG_AT_LEAST(39)
     328    CHECK_DEC_CONST(137438953472);
     329    CHECK_DEC_CONST(274877906943);
     330  #endif
     331  #if LONG_AT_LEAST(40)
     332    CHECK_DEC_CONST(274877906944);
     333    CHECK_DEC_CONST(549755813887);
     334  #endif
     335  #if LONG_AT_LEAST(41)
     336    CHECK_DEC_CONST(549755813888);
     337    CHECK_DEC_CONST(1099511627775);
     338  #endif
     339  #if LONG_AT_LEAST(42)
     340    CHECK_DEC_CONST(1099511627776);
     341    CHECK_DEC_CONST(2199023255551);
     342  #endif
     343  #if LONG_AT_LEAST(43)
     344    CHECK_DEC_CONST(2199023255552);
     345    CHECK_DEC_CONST(4398046511103);
     346  #endif
     347  #if LONG_AT_LEAST(44)
     348    CHECK_DEC_CONST(4398046511104);
     349    CHECK_DEC_CONST(8796093022207);
     350  #endif
     351  #if LONG_AT_LEAST(45)
     352    CHECK_DEC_CONST(8796093022208);
     353    CHECK_DEC_CONST(17592186044415);
     354  #endif
     355  #if LONG_AT_LEAST(46)
     356    CHECK_DEC_CONST(17592186044416);
     357    CHECK_DEC_CONST(35184372088831);
     358  #endif
     359  #if LONG_AT_LEAST(47)
     360    CHECK_DEC_CONST(35184372088832);
     361    CHECK_DEC_CONST(70368744177663);
     362  #endif
     363  #if LONG_AT_LEAST(48)
     364    CHECK_DEC_CONST(70368744177664);
     365    CHECK_DEC_CONST(140737488355327);
     366  #endif
     367  #if LONG_AT_LEAST(49)
     368    CHECK_DEC_CONST(140737488355328);
     369    CHECK_DEC_CONST(281474976710655);
     370  #endif
     371  #if LONG_AT_LEAST(50)
     372    CHECK_DEC_CONST(281474976710656);
     373    CHECK_DEC_CONST(562949953421311);
     374  #endif
     375  #if LONG_AT_LEAST(51)
     376    CHECK_DEC_CONST(562949953421312);
     377    CHECK_DEC_CONST(1125899906842623);
     378  #endif
     379  #if LONG_AT_LEAST(52)
     380    CHECK_DEC_CONST(1125899906842624);
     381    CHECK_DEC_CONST(2251799813685247);
     382  #endif
     383  #if LONG_AT_LEAST(53)
     384    CHECK_DEC_CONST(2251799813685248);
     385    CHECK_DEC_CONST(4503599627370495);
     386  #endif
     387  #if LONG_AT_LEAST(54)
     388    CHECK_DEC_CONST(4503599627370496);
     389    CHECK_DEC_CONST(9007199254740991);
     390  #endif
     391  #if LONG_AT_LEAST(55)
     392    CHECK_DEC_CONST(9007199254740992);
     393    CHECK_DEC_CONST(18014398509481983);
     394  #endif
     395  #if LONG_AT_LEAST(56)
     396    CHECK_DEC_CONST(18014398509481984);
     397    CHECK_DEC_CONST(36028797018963967);
     398  #endif
     399  #if LONG_AT_LEAST(57)
     400    CHECK_DEC_CONST(36028797018963968);
     401    CHECK_DEC_CONST(72057594037927935);
     402  #endif
     403  #if LONG_AT_LEAST(58)
     404    CHECK_DEC_CONST(72057594037927936);
     405    CHECK_DEC_CONST(144115188075855871);
     406  #endif
     407  #if LONG_AT_LEAST(59)
     408    CHECK_DEC_CONST(144115188075855872);
     409    CHECK_DEC_CONST(288230376151711743);
     410  #endif
     411  #if LONG_AT_LEAST(60)
     412    CHECK_DEC_CONST(288230376151711744);
     413    CHECK_DEC_CONST(576460752303423487);
     414  #endif
     415  #if LONG_AT_LEAST(61)
     416    CHECK_DEC_CONST(576460752303423488);
     417    CHECK_DEC_CONST(1152921504606846975);
     418  #endif
     419  #if LONG_AT_LEAST(62)
     420    CHECK_DEC_CONST(1152921504606846976);
     421    CHECK_DEC_CONST(2305843009213693951);
     422  #endif
     423  #if LONG_AT_LEAST(63)
     424    CHECK_DEC_CONST(2305843009213693952);
     425    CHECK_DEC_CONST(4611686018427387903);
     426  #endif
     427  #if LONG_AT_LEAST(64)
     428    CHECK_DEC_CONST(4611686018427387904);
     429    CHECK_DEC_CONST(9223372036854775807);
     430  #endif
     431    /* Separate checks for values that are unsigned.  */
     432    CHECK_UNSUF_DEC_TYPE(LARGE_UNSIGNED_DECIMAL); /* { dg-warning "unsigned" "unsigned decimal no suffix" } */
     433    CHECK_SUFl_TYPE(LARGE_UNSIGNED_DECIMALl); /* { dg-warning "unsigned" "unsigned decimal long suffix" } */
     434    CHECK_SUFl_TYPE(LARGE_UNSIGNED_DECIMALL); /* { dg-warning "unsigned" "unsigned decimal long suffix" } */
     435    CHECK_SUFu_TYPE(LARGE_UNSIGNED_DECIMALu);
     436    CHECK_SUFu_TYPE(LARGE_UNSIGNED_DECIMALU);
     437    CHECK_SUFul_TYPE(LARGE_UNSIGNED_DECIMALul);
     438    CHECK_SUFul_TYPE(LARGE_UNSIGNED_DECIMALuL);
     439    CHECK_SUFul_TYPE(LARGE_UNSIGNED_DECIMALUl);
     440    CHECK_SUFul_TYPE(LARGE_UNSIGNED_DECIMALUL);
     441    /* Octal and hexadecimal.  */
     442    /* Check all 2^n and 2^n - 1 up to 2^64 - 1.  */
     443    CHECK_OCT_CONST(0);
     444    CHECK_HEX_CONST(0);
     445    CHECK_OCT_CONST(01);
     446    CHECK_HEX_CONST(1);
     447    CHECK_OCT_CONST(02);
     448    CHECK_HEX_CONST(2);
     449    CHECK_OCT_CONST(03);
     450    CHECK_HEX_CONST(3);
     451    CHECK_OCT_CONST(04);
     452    CHECK_HEX_CONST(4);
     453    CHECK_OCT_CONST(07);
     454    CHECK_HEX_CONST(7);
     455    CHECK_OCT_CONST(010);
     456    CHECK_HEX_CONST(8);
     457    CHECK_OCT_CONST(017);
     458    CHECK_HEX_CONST(f);
     459    CHECK_OCT_CONST(020);
     460    CHECK_HEX_CONST(10);
     461    CHECK_OCT_CONST(037);
     462    CHECK_HEX_CONST(1f);
     463    CHECK_OCT_CONST(040);
     464    CHECK_HEX_CONST(20);
     465    CHECK_OCT_CONST(077);
     466    CHECK_HEX_CONST(3f);
     467    CHECK_OCT_CONST(0100);
     468    CHECK_HEX_CONST(40);
     469    CHECK_OCT_CONST(0177);
     470    CHECK_HEX_CONST(7f);
     471    CHECK_OCT_CONST(0200);
     472    CHECK_HEX_CONST(80);
     473    CHECK_OCT_CONST(0377);
     474    CHECK_HEX_CONST(ff);
     475    CHECK_OCT_CONST(0400);
     476    CHECK_HEX_CONST(100);
     477    CHECK_OCT_CONST(0777);
     478    CHECK_HEX_CONST(1ff);
     479    CHECK_OCT_CONST(01000);
     480    CHECK_HEX_CONST(200);
     481    CHECK_OCT_CONST(01777);
     482    CHECK_HEX_CONST(3ff);
     483    CHECK_OCT_CONST(02000);
     484    CHECK_HEX_CONST(400);
     485    CHECK_OCT_CONST(03777);
     486    CHECK_HEX_CONST(7ff);
     487    CHECK_OCT_CONST(04000);
     488    CHECK_HEX_CONST(800);
     489    CHECK_OCT_CONST(07777);
     490    CHECK_HEX_CONST(fff);
     491    CHECK_OCT_CONST(010000);
     492    CHECK_HEX_CONST(1000);
     493    CHECK_OCT_CONST(017777);
     494    CHECK_HEX_CONST(1fff);
     495    CHECK_OCT_CONST(020000);
     496    CHECK_HEX_CONST(2000);
     497    CHECK_OCT_CONST(037777);
     498    CHECK_HEX_CONST(3fff);
     499    CHECK_OCT_CONST(040000);
     500    CHECK_HEX_CONST(4000);
     501    CHECK_OCT_CONST(077777);
     502    CHECK_HEX_CONST(7fff);
     503    CHECK_OCT_CONST(0100000);
     504    CHECK_HEX_CONST(8000);
     505    CHECK_OCT_CONST(0177777);
     506    CHECK_HEX_CONST(ffff);
     507    CHECK_OCT_CONST(0200000);
     508    CHECK_HEX_CONST(10000);
     509    CHECK_OCT_CONST(0377777);
     510    CHECK_HEX_CONST(1ffff);
     511    CHECK_OCT_CONST(0400000);
     512    CHECK_HEX_CONST(20000);
     513    CHECK_OCT_CONST(0777777);
     514    CHECK_HEX_CONST(3ffff);
     515    CHECK_OCT_CONST(01000000);
     516    CHECK_HEX_CONST(40000);
     517    CHECK_OCT_CONST(01777777);
     518    CHECK_HEX_CONST(7ffff);
     519    CHECK_OCT_CONST(02000000);
     520    CHECK_HEX_CONST(80000);
     521    CHECK_OCT_CONST(03777777);
     522    CHECK_HEX_CONST(fffff);
     523    CHECK_OCT_CONST(04000000);
     524    CHECK_HEX_CONST(100000);
     525    CHECK_OCT_CONST(07777777);
     526    CHECK_HEX_CONST(1fffff);
     527    CHECK_OCT_CONST(010000000);
     528    CHECK_HEX_CONST(200000);
     529    CHECK_OCT_CONST(017777777);
     530    CHECK_HEX_CONST(3fffff);
     531    CHECK_OCT_CONST(020000000);
     532    CHECK_HEX_CONST(400000);
     533    CHECK_OCT_CONST(037777777);
     534    CHECK_HEX_CONST(7fffff);
     535    CHECK_OCT_CONST(040000000);
     536    CHECK_HEX_CONST(800000);
     537    CHECK_OCT_CONST(077777777);
     538    CHECK_HEX_CONST(ffffff);
     539    CHECK_OCT_CONST(0100000000);
     540    CHECK_HEX_CONST(1000000);
     541    CHECK_OCT_CONST(0177777777);
     542    CHECK_HEX_CONST(1ffffff);
     543    CHECK_OCT_CONST(0200000000);
     544    CHECK_HEX_CONST(2000000);
     545    CHECK_OCT_CONST(0377777777);
     546    CHECK_HEX_CONST(3ffffff);
     547    CHECK_OCT_CONST(0400000000);
     548    CHECK_HEX_CONST(4000000);
     549    CHECK_OCT_CONST(0777777777);
     550    CHECK_HEX_CONST(7ffffff);
     551    CHECK_OCT_CONST(01000000000);
     552    CHECK_HEX_CONST(8000000);
     553    CHECK_OCT_CONST(01777777777);
     554    CHECK_HEX_CONST(fffffff);
     555    CHECK_OCT_CONST(02000000000);
     556    CHECK_HEX_CONST(10000000);
     557    CHECK_OCT_CONST(03777777777);
     558    CHECK_HEX_CONST(1fffffff);
     559    CHECK_OCT_CONST(04000000000);
     560    CHECK_HEX_CONST(20000000);
     561    CHECK_OCT_CONST(07777777777);
     562    CHECK_HEX_CONST(3fffffff);
     563    CHECK_OCT_CONST(010000000000);
     564    CHECK_HEX_CONST(40000000);
     565    CHECK_OCT_CONST(017777777777);
     566    CHECK_HEX_CONST(7fffffff);
     567    CHECK_OCT_CONST(020000000000);
     568    CHECK_HEX_CONST(80000000);
     569    CHECK_OCT_CONST(037777777777);
     570    CHECK_HEX_CONST(ffffffff);
     571  #if LONG_AT_LEAST(33)
     572    CHECK_OCT_CONST(040000000000);
     573    CHECK_HEX_CONST(100000000);
     574    CHECK_OCT_CONST(077777777777);
     575    CHECK_HEX_CONST(1ffffffff);
     576  #endif
     577  #if LONG_AT_LEAST(34)
     578    CHECK_OCT_CONST(0100000000000);
     579    CHECK_HEX_CONST(200000000);
     580    CHECK_OCT_CONST(0177777777777);
     581    CHECK_HEX_CONST(3ffffffff);
     582  #endif
     583  #if LONG_AT_LEAST(35)
     584    CHECK_OCT_CONST(0200000000000);
     585    CHECK_HEX_CONST(400000000);
     586    CHECK_OCT_CONST(0377777777777);
     587    CHECK_HEX_CONST(7ffffffff);
     588  #endif
     589  #if LONG_AT_LEAST(36)
     590    CHECK_OCT_CONST(0400000000000);
     591    CHECK_HEX_CONST(800000000);
     592    CHECK_OCT_CONST(0777777777777);
     593    CHECK_HEX_CONST(fffffffff);
     594  #endif
     595  #if LONG_AT_LEAST(37)
     596    CHECK_OCT_CONST(01000000000000);
     597    CHECK_HEX_CONST(1000000000);
     598    CHECK_OCT_CONST(01777777777777);
     599    CHECK_HEX_CONST(1fffffffff);
     600  #endif
     601  #if LONG_AT_LEAST(38)
     602    CHECK_OCT_CONST(02000000000000);
     603    CHECK_HEX_CONST(2000000000);
     604    CHECK_OCT_CONST(03777777777777);
     605    CHECK_HEX_CONST(3fffffffff);
     606  #endif
     607  #if LONG_AT_LEAST(39)
     608    CHECK_OCT_CONST(04000000000000);
     609    CHECK_HEX_CONST(4000000000);
     610    CHECK_OCT_CONST(07777777777777);
     611    CHECK_HEX_CONST(7fffffffff);
     612  #endif
     613  #if LONG_AT_LEAST(40)
     614    CHECK_OCT_CONST(010000000000000);
     615    CHECK_HEX_CONST(8000000000);
     616    CHECK_OCT_CONST(017777777777777);
     617    CHECK_HEX_CONST(ffffffffff);
     618  #endif
     619  #if LONG_AT_LEAST(41)
     620    CHECK_OCT_CONST(020000000000000);
     621    CHECK_HEX_CONST(10000000000);
     622    CHECK_OCT_CONST(037777777777777);
     623    CHECK_HEX_CONST(1ffffffffff);
     624  #endif
     625  #if LONG_AT_LEAST(42)
     626    CHECK_OCT_CONST(040000000000000);
     627    CHECK_HEX_CONST(20000000000);
     628    CHECK_OCT_CONST(077777777777777);
     629    CHECK_HEX_CONST(3ffffffffff);
     630  #endif
     631  #if LONG_AT_LEAST(43)
     632    CHECK_OCT_CONST(0100000000000000);
     633    CHECK_HEX_CONST(40000000000);
     634    CHECK_OCT_CONST(0177777777777777);
     635    CHECK_HEX_CONST(7ffffffffff);
     636  #endif
     637  #if LONG_AT_LEAST(44)
     638    CHECK_OCT_CONST(0200000000000000);
     639    CHECK_HEX_CONST(80000000000);
     640    CHECK_OCT_CONST(0377777777777777);
     641    CHECK_HEX_CONST(fffffffffff);
     642  #endif
     643  #if LONG_AT_LEAST(45)
     644    CHECK_OCT_CONST(0400000000000000);
     645    CHECK_HEX_CONST(100000000000);
     646    CHECK_OCT_CONST(0777777777777777);
     647    CHECK_HEX_CONST(1fffffffffff);
     648  #endif
     649  #if LONG_AT_LEAST(46)
     650    CHECK_OCT_CONST(01000000000000000);
     651    CHECK_HEX_CONST(200000000000);
     652    CHECK_OCT_CONST(01777777777777777);
     653    CHECK_HEX_CONST(3fffffffffff);
     654  #endif
     655  #if LONG_AT_LEAST(47)
     656    CHECK_OCT_CONST(02000000000000000);
     657    CHECK_HEX_CONST(400000000000);
     658    CHECK_OCT_CONST(03777777777777777);
     659    CHECK_HEX_CONST(7fffffffffff);
     660  #endif
     661  #if LONG_AT_LEAST(48)
     662    CHECK_OCT_CONST(04000000000000000);
     663    CHECK_HEX_CONST(800000000000);
     664    CHECK_OCT_CONST(07777777777777777);
     665    CHECK_HEX_CONST(ffffffffffff);
     666  #endif
     667  #if LONG_AT_LEAST(49)
     668    CHECK_OCT_CONST(010000000000000000);
     669    CHECK_HEX_CONST(1000000000000);
     670    CHECK_OCT_CONST(017777777777777777);
     671    CHECK_HEX_CONST(1ffffffffffff);
     672  #endif
     673  #if LONG_AT_LEAST(50)
     674    CHECK_OCT_CONST(020000000000000000);
     675    CHECK_HEX_CONST(2000000000000);
     676    CHECK_OCT_CONST(037777777777777777);
     677    CHECK_HEX_CONST(3ffffffffffff);
     678  #endif
     679  #if LONG_AT_LEAST(51)
     680    CHECK_OCT_CONST(040000000000000000);
     681    CHECK_HEX_CONST(4000000000000);
     682    CHECK_OCT_CONST(077777777777777777);
     683    CHECK_HEX_CONST(7ffffffffffff);
     684  #endif
     685  #if LONG_AT_LEAST(52)
     686    CHECK_OCT_CONST(0100000000000000000);
     687    CHECK_HEX_CONST(8000000000000);
     688    CHECK_OCT_CONST(0177777777777777777);
     689    CHECK_HEX_CONST(fffffffffffff);
     690  #endif
     691  #if LONG_AT_LEAST(53)
     692    CHECK_OCT_CONST(0200000000000000000);
     693    CHECK_HEX_CONST(10000000000000);
     694    CHECK_OCT_CONST(0377777777777777777);
     695    CHECK_HEX_CONST(1fffffffffffff);
     696  #endif
     697  #if LONG_AT_LEAST(54)
     698    CHECK_OCT_CONST(0400000000000000000);
     699    CHECK_HEX_CONST(20000000000000);
     700    CHECK_OCT_CONST(0777777777777777777);
     701    CHECK_HEX_CONST(3fffffffffffff);
     702  #endif
     703  #if LONG_AT_LEAST(55)
     704    CHECK_OCT_CONST(01000000000000000000);
     705    CHECK_HEX_CONST(40000000000000);
     706    CHECK_OCT_CONST(01777777777777777777);
     707    CHECK_HEX_CONST(7fffffffffffff);
     708  #endif
     709  #if LONG_AT_LEAST(56)
     710    CHECK_OCT_CONST(02000000000000000000);
     711    CHECK_HEX_CONST(80000000000000);
     712    CHECK_OCT_CONST(03777777777777777777);
     713    CHECK_HEX_CONST(ffffffffffffff);
     714  #endif
     715  #if LONG_AT_LEAST(57)
     716    CHECK_OCT_CONST(04000000000000000000);
     717    CHECK_HEX_CONST(100000000000000);
     718    CHECK_OCT_CONST(07777777777777777777);
     719    CHECK_HEX_CONST(1ffffffffffffff);
     720  #endif
     721  #if LONG_AT_LEAST(58)
     722    CHECK_OCT_CONST(010000000000000000000);
     723    CHECK_HEX_CONST(200000000000000);
     724    CHECK_OCT_CONST(017777777777777777777);
     725    CHECK_HEX_CONST(3ffffffffffffff);
     726  #endif
     727  #if LONG_AT_LEAST(59)
     728    CHECK_OCT_CONST(020000000000000000000);
     729    CHECK_HEX_CONST(400000000000000);
     730    CHECK_OCT_CONST(037777777777777777777);
     731    CHECK_HEX_CONST(7ffffffffffffff);
     732  #endif
     733  #if LONG_AT_LEAST(60)
     734    CHECK_OCT_CONST(040000000000000000000);
     735    CHECK_HEX_CONST(800000000000000);
     736    CHECK_OCT_CONST(077777777777777777777);
     737    CHECK_HEX_CONST(fffffffffffffff);
     738  #endif
     739  #if LONG_AT_LEAST(61)
     740    CHECK_OCT_CONST(0100000000000000000000);
     741    CHECK_HEX_CONST(1000000000000000);
     742    CHECK_OCT_CONST(0177777777777777777777);
     743    CHECK_HEX_CONST(1fffffffffffffff);
     744  #endif
     745  #if LONG_AT_LEAST(62)
     746    CHECK_OCT_CONST(0200000000000000000000);
     747    CHECK_HEX_CONST(2000000000000000);
     748    CHECK_OCT_CONST(0377777777777777777777);
     749    CHECK_HEX_CONST(3fffffffffffffff);
     750  #endif
     751  #if LONG_AT_LEAST(63)
     752    CHECK_OCT_CONST(0400000000000000000000);
     753    CHECK_HEX_CONST(4000000000000000);
     754    CHECK_OCT_CONST(0777777777777777777777);
     755    CHECK_HEX_CONST(7fffffffffffffff);
     756  #endif
     757  #if LONG_AT_LEAST(64)
     758    CHECK_OCT_CONST(01000000000000000000000);
     759    CHECK_HEX_CONST(8000000000000000);
     760    CHECK_OCT_CONST(01777777777777777777777);
     761    CHECK_HEX_CONST(ffffffffffffffff);
     762  #endif
     763  }