1 #include <limits.h> 2 #include <stdarg.h> 3 #include <stdbool.h> 4 #include <stdlib.h> 5 #include <stdio.h> 6 #include <string.h> 7 #include "../../gcc.dg/compat/compat-common.h" 8 9 #ifndef SKIP_ATTRIBUTE 10 # include "../../gcc.dg/compat/vector-defs.h" 11 #else 12 typedef int qi; 13 typedef int hi; 14 typedef int si; 15 typedef int di; 16 typedef float sf; 17 typedef float df; 18 typedef int v8qi; 19 typedef int v16qi; 20 typedef int v2hi; 21 typedef int v4hi; 22 typedef int v8hi; 23 typedef int v2si; 24 typedef int v4si; 25 typedef int v1di; 26 typedef int v2di; 27 typedef int v2sf; 28 typedef int v4sf; 29 typedef int v16sf; 30 typedef int v2df; 31 typedef int u8qi; 32 typedef int u16qi; 33 typedef int u2hi; 34 typedef int u4hi; 35 typedef int u8hi; 36 typedef int u2si; 37 typedef int u4si; 38 typedef int u1di; 39 typedef int u2di; 40 typedef int u2sf; 41 typedef int u4sf; 42 typedef int u16sf; 43 typedef int u2df; 44 #endif 45 #if (defined __i386__ || defined __x86_64__) && !defined SKIP_ATTRIBUTE 46 # ifdef __MMX__ 47 typedef int __m64 __attribute__ ((__vector_size__ (8))); 48 # else 49 typedef int __m64; 50 # endif 51 # ifdef __SSE__ 52 typedef float __m128 __attribute__ ((__vector_size__ (16))); 53 # else 54 typedef int __m128; 55 # endif 56 #else 57 typedef int __m64; 58 typedef int __m128; 59 #endif 60 #if defined (__uClinux__) 61 /* The maximum achievable alignment on uClinux is usually 16 bytes. */ 62 #define v16sf v4sf 63 #define u16sf u4sf 64 #endif 65 66 #define FLDS_MAX 32 67 extern struct Info 68 { 69 int nfields, nbitfields; 70 void *sp, *a0p, *a3p; 71 void *flds[FLDS_MAX]; 72 size_t sz, sizes[FLDS_MAX]; 73 size_t als, ala0, ala3, aligns[FLDS_MAX]; 74 } info; 75 76 extern int intarray[256]; 77 extern int fn0 (void), fn1 (void), fn2 (void), fn3 (void), fn4 (void); 78 extern int fn5 (void), fn6 (void), fn7 (void), fn8 (void), fn9 (void); 79 80 #ifdef DBG 81 #define FAIL(n, m) printf ("fail %d.%d\n", n, m), ++fails 82 #else 83 #define FAIL(n, m) ++fails 84 #endif 85 86 #ifdef SKIP_ATTRIBUTE 87 # define __attribute__(x) 88 #endif 89 #define atal __attribute__((aligned)) 90 #define atpa __attribute__((packed)) 91 #define atalpa __attribute__((aligned, packed)) 92 #define atpaal __attribute__((packed, aligned)) 93 #define atal1 __attribute__((aligned (1))) 94 #define atal2 __attribute__((aligned (2))) 95 #define atal4 __attribute__((aligned (4))) 96 #define atal8 __attribute__((aligned (8))) 97 #define atal16 __attribute__((aligned (16))) 98 #define atal1pa __attribute__((aligned (1), packed)) 99 #define atal2pa __attribute__((aligned (2), packed)) 100 #define atal4pa __attribute__((aligned (4), packed)) 101 #define atal8pa __attribute__((aligned (8), packed)) 102 #define atal16pa __attribute__((aligned (16), packed)) 103 #define atpaal1 __attribute__((packed, aligned (1))) 104 #define atpaal2 __attribute__((packed, aligned (2))) 105 #define atpaal4 __attribute__((packed, aligned (4))) 106 #define atpaal8 __attribute__((packed, aligned (8))) 107 #define atpaal16 __attribute__((packed, aligned (16))) 108 109 #if UCHAR_MAX == 255 && USHORT_MAX == 65535 && UINT_MAX == 4294967295U \ 110 && ULLONG_MAX == 18446744073709551615ULL 111 /* For ILP32 and LP64 targets, assume float is at least 32-bit 112 and double plus long double at least 64-bit. */ 113 # define atalx1 atal1 114 # define atalx2 atal2 115 # define atalx4 atal4 116 # define atalx8 atal8 117 # define atalx16 atal16 118 # define atalx1pa atal1pa 119 # define atalx2pa atal2pa 120 # define atalx4pa atal4pa 121 # define atalx8pa atal8pa 122 # define atalx16pa atal16pa 123 # define atpaalx1 atpaal1 124 # define atpaalx2 atpaal2 125 # define atpaalx4 atpaal4 126 # define atpaalx8 atpaal8 127 # define atpaalx16 atpaal16 128 # if ULONG_MAX > 4294967295UL 129 # define ataly8 atal8 130 # define ataly8pa atal8pa 131 # define atpaaly8 atpaal8 132 # define ataly16 atal16 133 # define ataly16pa atal16pa 134 # define atpaaly16 atpaal16 135 # else 136 # define ataly8 137 # define ataly8pa 138 # define atpaaly8 139 # define ataly16 140 # define ataly16pa 141 # define atpaaly16 142 # endif 143 #else 144 # define atalx1 145 # define atalx2 146 # define atalx4 147 # define atalx8 148 # define atalx16 149 # define atalx1pa 150 # define atalx2pa 151 # define atalx4pa 152 # define atalx8pa 153 # define atalx16pa 154 # define atpaalx1 155 # define atpaalx2 156 # define atpaalx4 157 # define atpaalx8 158 # define atpaalx16 159 # define ataly8 160 # define ataly8pa 161 # define atpaaly8 162 # define ataly16 163 # define ataly16pa 164 # define atpaaly16 165 #endif 166 167 #define atQI __attribute__((mode (QI))) 168 #define atHI __attribute__((mode (HI))) 169 #define atSI __attribute__((mode (SI))) 170 #define atDI __attribute__((mode (DI))) 171 172 enum E0 { e0_0 }; 173 enum E1 { e1_0, e1_1 }; 174 enum E2 { e2_m3 = -3, e2_m2, e2_m1, e2_0, e2_1, e2_2, e2_3 }; 175 enum E3 { e3_m127 = -127, e3_m126, e3_m125, e3_0 = 0, e3_125 = 125, e3_126, e3_127 }; 176 enum E4 { e4_0, e4_1, e4_2, e4_3, e4_253 = 253, e4_254, e4_255 }; 177 enum E5 { e5_m32767 = -32767, e5_m32766, e5_m32765, e5_0 = 0, e5_32765 = 32765, e5_32766, e5_32767 }; 178 enum E6 { e6_0, e6_1, e6_2, e6_3, e6_65533 = 65533, e6_65534, e6_65535 }; 179 enum E7 { e7_m2147483647 = -2147483647, e7_m2147483646, e7_m2147483645, 180 e7_0, e7_2147483645 = 2147483645, e7_2147483646, e7_2147483647 }; 181 enum E8 { e8_0, e8_1, e8_2, e8_3, e8_4294967293 = 4294967293U, e8_4294967294, e8_4294967295 }; 182 enum E9 { e9_m1099511627775 = -1099511627775LL, e9_m1099511627774, e9_m1099511627773, 183 e9_0, e9_1099511627773 = 1099511627773LL, e9_1099511627774, e9_1099511627775 }; 184 185 typedef char Tchar; 186 typedef signed char Tschar; 187 typedef unsigned char Tuchar; 188 typedef short int Tshort; 189 typedef unsigned short int Tushort; 190 typedef int Tint; 191 typedef unsigned int Tuint; 192 typedef long int Tlong; 193 typedef unsigned long int Tulong; 194 typedef long long int Tllong; 195 typedef unsigned long long int Tullong; 196 typedef float Tfloat; 197 typedef double Tdouble; 198 typedef long double Tldouble; 199 typedef _Complex float Tcfloat; 200 typedef _Complex double Tcdouble; 201 typedef _Complex long double Tcldouble; 202 typedef bool Tbool; 203 typedef enum E0 TE0; 204 typedef enum E1 TE1; 205 typedef enum E2 TE2; 206 typedef enum E3 TE3; 207 typedef enum E4 TE4; 208 typedef enum E5 TE5; 209 typedef enum E6 TE6; 210 typedef enum E7 TE7; 211 typedef enum E8 TE8; 212 typedef enum E9 TE9; 213 typedef void *Tptr; 214 typedef char *Tcptr; 215 typedef int *Tiptr; 216 typedef char Talchar atal; 217 typedef signed char Talschar atal; 218 typedef unsigned char Taluchar atal; 219 typedef short int Talshort atal; 220 typedef unsigned short int Talushort atal; 221 typedef int Talint atal; 222 typedef unsigned int Taluint atal; 223 typedef long int Tallong atal; 224 typedef unsigned long int Talulong atal; 225 typedef long long int Talllong atal; 226 typedef unsigned long long int Talullong atal; 227 typedef float Talfloat atal; 228 typedef double Taldouble atal; 229 typedef long double Talldouble atal; 230 typedef _Complex float Talcfloat atal; 231 typedef _Complex double Talcdouble atal; 232 typedef _Complex long double Talcldouble atal; 233 typedef bool Talbool atal; 234 typedef enum E0 TalE0 atal; 235 typedef enum E1 TalE1 atal; 236 typedef enum E2 TalE2 atal; 237 typedef enum E3 TalE3 atal; 238 typedef enum E4 TalE4 atal; 239 typedef enum E5 TalE5 atal; 240 typedef enum E6 TalE6 atal; 241 typedef enum E7 TalE7 atal; 242 typedef enum E8 TalE8 atal; 243 typedef enum E9 TalE9 atal; 244 typedef void *Talptr atal; 245 typedef char *Talcptr atal; 246 typedef int *Taliptr atal; 247 typedef char Tal1char atal1; 248 typedef signed char Tal1schar atal1; 249 typedef unsigned char Tal1uchar atal1; 250 typedef short int Tal1short atal1; 251 typedef unsigned short int Tal1ushort atal1; 252 typedef int Tal1int atal1; 253 typedef unsigned int Tal1uint atal1; 254 typedef long int Tal1long atal1; 255 typedef unsigned long int Tal1ulong atal1; 256 typedef long long int Tal1llong atal1; 257 typedef unsigned long long int Tal1ullong atal1; 258 typedef float Tal1float atal1; 259 typedef double Tal1double atal1; 260 typedef long double Tal1ldouble atal1; 261 typedef _Complex float Tal1cfloat atal1; 262 typedef _Complex double Tal1cdouble atal1; 263 typedef _Complex long double Tal1cldouble atal1; 264 typedef bool Tal1bool atal1; 265 typedef enum E0 Tal1E0 atal1; 266 typedef enum E1 Tal1E1 atal1; 267 typedef enum E2 Tal1E2 atal1; 268 typedef enum E3 Tal1E3 atal1; 269 typedef enum E4 Tal1E4 atal1; 270 typedef enum E5 Tal1E5 atal1; 271 typedef enum E6 Tal1E6 atal1; 272 typedef enum E7 Tal1E7 atal1; 273 typedef enum E8 Tal1E8 atal1; 274 typedef enum E9 Tal1E9 atal1; 275 typedef void *Tal1ptr atal1; 276 typedef char *Tal1cptr atal1; 277 typedef int *Tal1iptr atal1; 278 typedef char Tal2char atal2; 279 typedef signed char Tal2schar atal2; 280 typedef unsigned char Tal2uchar atal2; 281 typedef short int Tal2short atal2; 282 typedef unsigned short int Tal2ushort atal2; 283 typedef int Tal2int atal2; 284 typedef unsigned int Tal2uint atal2; 285 typedef long int Tal2long atal2; 286 typedef unsigned long int Tal2ulong atal2; 287 typedef long long int Tal2llong atal2; 288 typedef unsigned long long int Tal2ullong atal2; 289 typedef float Tal2float atal2; 290 typedef double Tal2double atal2; 291 typedef long double Tal2ldouble atal2; 292 typedef _Complex float Tal2cfloat atal2; 293 typedef _Complex double Tal2cdouble atal2; 294 typedef _Complex long double Tal2cldouble atal2; 295 typedef bool Tal2bool atal2; 296 typedef enum E0 Tal2E0 atal2; 297 typedef enum E1 Tal2E1 atal2; 298 typedef enum E2 Tal2E2 atal2; 299 typedef enum E3 Tal2E3 atal2; 300 typedef enum E4 Tal2E4 atal2; 301 typedef enum E5 Tal2E5 atal2; 302 typedef enum E6 Tal2E6 atal2; 303 typedef enum E7 Tal2E7 atal2; 304 typedef enum E8 Tal2E8 atal2; 305 typedef enum E9 Tal2E9 atal2; 306 typedef void *Tal2ptr atal2; 307 typedef char *Tal2cptr atal2; 308 typedef int *Tal2iptr atal2; 309 typedef char Tal4char atal4; 310 typedef signed char Tal4schar atal4; 311 typedef unsigned char Tal4uchar atal4; 312 typedef short int Tal4short atal4; 313 typedef unsigned short int Tal4ushort atal4; 314 typedef int Tal4int atal4; 315 typedef unsigned int Tal4uint atal4; 316 typedef long int Tal4long atal4; 317 typedef unsigned long int Tal4ulong atal4; 318 typedef long long int Tal4llong atal4; 319 typedef unsigned long long int Tal4ullong atal4; 320 typedef float Tal4float atal4; 321 typedef double Tal4double atal4; 322 typedef long double Tal4ldouble atal4; 323 typedef _Complex float Tal4cfloat atal4; 324 typedef _Complex double Tal4cdouble atal4; 325 typedef _Complex long double Tal4cldouble atal4; 326 typedef bool Tal4bool atal4; 327 typedef enum E0 Tal4E0 atal4; 328 typedef enum E1 Tal4E1 atal4; 329 typedef enum E2 Tal4E2 atal4; 330 typedef enum E3 Tal4E3 atal4; 331 typedef enum E4 Tal4E4 atal4; 332 typedef enum E5 Tal4E5 atal4; 333 typedef enum E6 Tal4E6 atal4; 334 typedef enum E7 Tal4E7 atal4; 335 typedef enum E8 Tal4E8 atal4; 336 typedef enum E9 Tal4E9 atal4; 337 typedef void *Tal4ptr atal4; 338 typedef char *Tal4cptr atal4; 339 typedef int *Tal4iptr atal4; 340 typedef char Tal8char atal8; 341 typedef signed char Tal8schar atal8; 342 typedef unsigned char Tal8uchar atal8; 343 typedef short int Tal8short atal8; 344 typedef unsigned short int Tal8ushort atal8; 345 typedef int Tal8int atal8; 346 typedef unsigned int Tal8uint atal8; 347 typedef long int Tal8long atal8; 348 typedef unsigned long int Tal8ulong atal8; 349 typedef long long int Tal8llong atal8; 350 typedef unsigned long long int Tal8ullong atal8; 351 typedef float Tal8float atal8; 352 typedef double Tal8double atal8; 353 typedef long double Tal8ldouble atal8; 354 typedef _Complex float Tal8cfloat atal8; 355 typedef _Complex double Tal8cdouble atal8; 356 typedef _Complex long double Tal8cldouble atal8; 357 typedef bool Tal8bool atal8; 358 typedef enum E0 Tal8E0 atal8; 359 typedef enum E1 Tal8E1 atal8; 360 typedef enum E2 Tal8E2 atal8; 361 typedef enum E3 Tal8E3 atal8; 362 typedef enum E4 Tal8E4 atal8; 363 typedef enum E5 Tal8E5 atal8; 364 typedef enum E6 Tal8E6 atal8; 365 typedef enum E7 Tal8E7 atal8; 366 typedef enum E8 Tal8E8 atal8; 367 typedef enum E9 Tal8E9 atal8; 368 typedef void *Tal8ptr atal8; 369 typedef char *Tal8cptr atal8; 370 typedef int *Tal8iptr atal8; 371 typedef char Tal16char atal16; 372 typedef signed char Tal16schar atal16; 373 typedef unsigned char Tal16uchar atal16; 374 typedef short int Tal16short atal16; 375 typedef unsigned short int Tal16ushort atal16; 376 typedef int Tal16int atal16; 377 typedef unsigned int Tal16uint atal16; 378 typedef long int Tal16long atal16; 379 typedef unsigned long int Tal16ulong atal16; 380 typedef long long int Tal16llong atal16; 381 typedef unsigned long long int Tal16ullong atal16; 382 typedef float Tal16float atal16; 383 typedef double Tal16double atal16; 384 typedef long double Tal16ldouble atal16; 385 typedef _Complex float Tal16cfloat atal16; 386 typedef _Complex double Tal16cdouble atal16; 387 typedef _Complex long double Tal16cldouble atal16; 388 typedef bool Tal16bool atal16; 389 typedef enum E0 Tal16E0 atal16; 390 typedef enum E1 Tal16E1 atal16; 391 typedef enum E2 Tal16E2 atal16; 392 typedef enum E3 Tal16E3 atal16; 393 typedef enum E4 Tal16E4 atal16; 394 typedef enum E5 Tal16E5 atal16; 395 typedef enum E6 Tal16E6 atal16; 396 typedef enum E7 Tal16E7 atal16; 397 typedef enum E8 Tal16E8 atal16; 398 typedef enum E9 Tal16E9 atal16; 399 typedef void *Tal16ptr atal16; 400 typedef char *Tal16cptr atal16; 401 typedef int *Tal16iptr atal16; 402 typedef char Talx1char atalx1; 403 typedef signed char Talx1schar atalx1; 404 typedef unsigned char Talx1uchar atalx1; 405 typedef short int Talx1short atalx1; 406 typedef unsigned short int Talx1ushort atalx1; 407 typedef int Talx1int atalx1; 408 typedef unsigned int Talx1uint atalx1; 409 typedef long int Talx1long atalx1; 410 typedef unsigned long int Talx1ulong atalx1; 411 typedef long long int Talx1llong atalx1; 412 typedef unsigned long long int Talx1ullong atalx1; 413 typedef float Talx1float atalx1; 414 typedef double Talx1double atalx1; 415 typedef long double Talx1ldouble atalx1; 416 typedef _Complex float Talx1cfloat atalx1; 417 typedef _Complex double Talx1cdouble atalx1; 418 typedef _Complex long double Talx1cldouble atalx1; 419 typedef bool Talx1bool atalx1; 420 typedef enum E0 Talx1E0 atalx1; 421 typedef enum E1 Talx1E1 atalx1; 422 typedef enum E2 Talx1E2 atalx1; 423 typedef enum E3 Talx1E3 atalx1; 424 typedef enum E4 Talx1E4 atalx1; 425 typedef enum E5 Talx1E5 atalx1; 426 typedef enum E6 Talx1E6 atalx1; 427 typedef enum E7 Talx1E7 atalx1; 428 typedef enum E8 Talx1E8 atalx1; 429 typedef enum E9 Talx1E9 atalx1; 430 typedef void *Talx1ptr atalx1; 431 typedef char *Talx1cptr atalx1; 432 typedef int *Talx1iptr atalx1; 433 typedef short int Talx2short atalx2; 434 typedef unsigned short int Talx2ushort atalx2; 435 typedef int Talx2int atalx2; 436 typedef unsigned int Talx2uint atalx2; 437 typedef long int Talx2long atalx2; 438 typedef unsigned long int Talx2ulong atalx2; 439 typedef long long int Talx2llong atalx2; 440 typedef unsigned long long int Talx2ullong atalx2; 441 typedef float Talx2float atalx2; 442 typedef double Talx2double atalx2; 443 typedef long double Talx2ldouble atalx2; 444 typedef _Complex float Talx2cfloat atalx2; 445 typedef _Complex double Talx2cdouble atalx2; 446 typedef _Complex long double Talx2cldouble atalx2; 447 typedef enum E0 Talx2E0 atalx2; 448 typedef enum E1 Talx2E1 atalx2; 449 typedef enum E2 Talx2E2 atalx2; 450 typedef enum E3 Talx2E3 atalx2; 451 typedef enum E4 Talx2E4 atalx2; 452 typedef enum E5 Talx2E5 atalx2; 453 typedef enum E6 Talx2E6 atalx2; 454 typedef enum E7 Talx2E7 atalx2; 455 typedef enum E8 Talx2E8 atalx2; 456 typedef enum E9 Talx2E9 atalx2; 457 typedef void *Talx2ptr atalx2; 458 typedef char *Talx2cptr atalx2; 459 typedef int *Talx2iptr atalx2; 460 typedef int Talx4int atalx4; 461 typedef unsigned int Talx4uint atalx4; 462 typedef long int Talx4long atalx4; 463 typedef unsigned long int Talx4ulong atalx4; 464 typedef long long int Talx4llong atalx4; 465 typedef unsigned long long int Talx4ullong atalx4; 466 typedef float Talx4float atalx4; 467 typedef double Talx4double atalx4; 468 typedef long double Talx4ldouble atalx4; 469 typedef _Complex float Talx4cfloat atalx4; 470 typedef _Complex double Talx4cdouble atalx4; 471 typedef _Complex long double Talx4cldouble atalx4; 472 typedef enum E0 Talx4E0 atalx4; 473 typedef enum E1 Talx4E1 atalx4; 474 typedef enum E2 Talx4E2 atalx4; 475 typedef enum E3 Talx4E3 atalx4; 476 typedef enum E4 Talx4E4 atalx4; 477 typedef enum E5 Talx4E5 atalx4; 478 typedef enum E6 Talx4E6 atalx4; 479 typedef enum E7 Talx4E7 atalx4; 480 typedef enum E8 Talx4E8 atalx4; 481 typedef enum E9 Talx4E9 atalx4; 482 typedef void *Talx4ptr atalx4; 483 typedef char *Talx4cptr atalx4; 484 typedef int *Talx4iptr atalx4; 485 typedef long int Taly8long ataly8; 486 typedef unsigned long int Taly8ulong ataly8; 487 typedef long long int Talx8llong atalx8; 488 typedef unsigned long long int Talx8ullong atalx8; 489 typedef double Talx8double atalx8; 490 typedef long double Talx8ldouble atalx8; 491 typedef _Complex float Talx8cfloat atalx8; 492 typedef _Complex double Talx8cdouble atalx8; 493 typedef _Complex long double Talx8cldouble atalx8; 494 typedef void *Taly8ptr ataly8; 495 typedef char *Taly8cptr ataly8; 496 typedef int *Taly8iptr ataly8; 497 typedef _Complex double Talx16cdouble atalx16; 498 typedef _Complex long double Talx16cldouble atalx16; 499 typedef int (*Tfnptr) (void); 500 501 #define T(n, fields, ops) TX(n, struct, , fields, ({ ops });) 502 #define U(n, fields, ops) TX(n, union, , fields, ({ ops });) 503