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 "compat-common.h" 8 9#ifndef SKIP_ATTRIBUTE 10# include "vector-defs.h" 11#else 12typedef int qi; 13typedef int hi; 14typedef int si; 15typedef int di; 16typedef float sf; 17typedef float df; 18typedef int v8qi; 19typedef int v16qi; 20typedef int v2hi; 21typedef int v4hi; 22typedef int v8hi; 23typedef int v2si; 24typedef int v4si; 25typedef int v1di; 26typedef int v2di; 27typedef int v2sf; 28typedef int v4sf; 29typedef int v16sf; 30typedef int v2df; 31typedef int u8qi; 32typedef int u16qi; 33typedef int u2hi; 34typedef int u4hi; 35typedef int u8hi; 36typedef int u2si; 37typedef int u4si; 38typedef int u1di; 39typedef int u2di; 40typedef int u2sf; 41typedef int u4sf; 42typedef int u16sf; 43typedef int u2df; 44#endif 45#if (defined __i386__ || defined __x86_64__) && !defined SKIP_ATTRIBUTE 46# ifdef __MMX__ 47typedef int __m64 __attribute__ ((__vector_size__ (8))); 48# else 49typedef int __m64; 50# endif 51# ifdef __SSE__ 52typedef float __m128 __attribute__ ((__vector_size__ (16))); 53# else 54typedef int __m128; 55# endif 56#else 57typedef int __m64; 58typedef 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 67extern 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 76extern int intarray[256]; 77extern int fn0 (void), fn1 (void), fn2 (void), fn3 (void), fn4 (void); 78extern 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 172enum E0 { e0_0 }; 173enum E1 { e1_0, e1_1 }; 174enum E2 { e2_m3 = -3, e2_m2, e2_m1, e2_0, e2_1, e2_2, e2_3 }; 175enum E3 { e3_m127 = -127, e3_m126, e3_m125, e3_0 = 0, e3_125 = 125, e3_126, e3_127 }; 176enum E4 { e4_0, e4_1, e4_2, e4_3, e4_253 = 253, e4_254, e4_255 }; 177enum E5 { e5_m32767 = -32767, e5_m32766, e5_m32765, e5_0 = 0, e5_32765 = 32765, e5_32766, e5_32767 }; 178enum E6 { e6_0, e6_1, e6_2, e6_3, e6_65533 = 65533, e6_65534, e6_65535 }; 179enum E7 { e7_m2147483647 = -2147483647, e7_m2147483646, e7_m2147483645, 180 e7_0, e7_2147483645 = 2147483645, e7_2147483646, e7_2147483647 }; 181enum E8 { e8_0, e8_1, e8_2, e8_3, e8_4294967293 = 4294967293U, e8_4294967294, e8_4294967295 }; 182enum E9 { e9_m1099511627775 = -1099511627775LL, e9_m1099511627774, e9_m1099511627773, 183 e9_0, e9_1099511627773 = 1099511627773LL, e9_1099511627774, e9_1099511627775 }; 184 185typedef char Tchar; 186typedef signed char Tschar; 187typedef unsigned char Tuchar; 188typedef short int Tshort; 189typedef unsigned short int Tushort; 190typedef int Tint; 191typedef unsigned int Tuint; 192typedef long int Tlong; 193typedef unsigned long int Tulong; 194typedef long long int Tllong; 195typedef unsigned long long int Tullong; 196#ifndef SKIP_COMPLEX_INT 197typedef _Complex char Tcchar; 198typedef _Complex signed char Tcschar; 199typedef _Complex unsigned char Tcuchar; 200typedef _Complex short int Tcshort; 201typedef _Complex unsigned short int Tcushort; 202typedef _Complex int Tcint; 203typedef _Complex unsigned int Tcuint; 204typedef _Complex long int Tclong; 205typedef _Complex unsigned long int Tculong; 206typedef _Complex long long int Tcllong; 207typedef _Complex unsigned long long int Tcullong; 208#endif 209typedef float Tfloat; 210typedef double Tdouble; 211typedef long double Tldouble; 212#ifndef SKIP_DECIMAL_FLOAT 213typedef _Decimal32 TDecimal32; 214typedef _Decimal64 TDecimal64; 215typedef _Decimal128 TDecimal128; 216#endif 217#ifndef SKIP_COMPLEX 218typedef _Complex float Tcfloat; 219typedef _Complex double Tcdouble; 220typedef _Complex long double Tcldouble; 221#endif 222typedef bool Tbool; 223typedef enum E0 TE0; 224typedef enum E1 TE1; 225typedef enum E2 TE2; 226typedef enum E3 TE3; 227typedef enum E4 TE4; 228typedef enum E5 TE5; 229typedef enum E6 TE6; 230typedef enum E7 TE7; 231typedef enum E8 TE8; 232typedef enum E9 TE9; 233typedef void *Tptr; 234typedef char *Tcptr; 235typedef int *Tiptr; 236typedef char Talchar atal; 237typedef signed char Talschar atal; 238typedef unsigned char Taluchar atal; 239typedef short int Talshort atal; 240typedef unsigned short int Talushort atal; 241typedef int Talint atal; 242typedef unsigned int Taluint atal; 243typedef long int Tallong atal; 244typedef unsigned long int Talulong atal; 245typedef long long int Talllong atal; 246typedef unsigned long long int Talullong atal; 247#ifndef SKIP_COMPLEX_INT 248typedef _Complex char Talcchar atal; 249typedef _Complex signed char Talcschar atal; 250typedef _Complex unsigned char Talcuchar atal; 251typedef _Complex short int Talcshort atal; 252typedef _Complex unsigned short int Talcushort atal; 253typedef _Complex int Talcint atal; 254typedef _Complex unsigned int Talcuint atal; 255typedef _Complex long int Talclong atal; 256typedef _Complex unsigned long int Talculong atal; 257typedef _Complex long long int Talcllong atal; 258typedef _Complex unsigned long long int Talcullong atal; 259#endif 260typedef float Talfloat atal; 261typedef double Taldouble atal; 262typedef long double Talldouble atal; 263#ifndef SKIP_DECIMAL_FLOAT 264typedef _Decimal32 TalDecimal32 atal; 265typedef _Decimal64 TalDecimal64 atal; 266typedef _Decimal128 TalDecimal128 atal; 267#endif 268#ifndef SKIP_COMPLEX 269typedef _Complex float Talcfloat atal; 270typedef _Complex double Talcdouble atal; 271typedef _Complex long double Talcldouble atal; 272#endif 273typedef bool Talbool atal; 274typedef enum E0 TalE0 atal; 275typedef enum E1 TalE1 atal; 276typedef enum E2 TalE2 atal; 277typedef enum E3 TalE3 atal; 278typedef enum E4 TalE4 atal; 279typedef enum E5 TalE5 atal; 280typedef enum E6 TalE6 atal; 281typedef enum E7 TalE7 atal; 282typedef enum E8 TalE8 atal; 283typedef enum E9 TalE9 atal; 284typedef void *Talptr atal; 285typedef char *Talcptr atal; 286typedef int *Taliptr atal; 287typedef char Tal1char atal1; 288typedef signed char Tal1schar atal1; 289typedef unsigned char Tal1uchar atal1; 290typedef short int Tal1short atal1; 291typedef unsigned short int Tal1ushort atal1; 292typedef int Tal1int atal1; 293typedef unsigned int Tal1uint atal1; 294typedef long int Tal1long atal1; 295typedef unsigned long int Tal1ulong atal1; 296typedef long long int Tal1llong atal1; 297typedef unsigned long long int Tal1ullong atal1; 298#ifndef SKIP_COMPLEX_INT 299typedef _Complex char Tal1cchar atal1; 300typedef _Complex signed char Tal1cschar atal1; 301typedef _Complex unsigned char Tal1cuchar atal1; 302typedef _Complex short int Tal1cshort atal1; 303typedef _Complex unsigned short int Tal1cushort atal1; 304typedef _Complex int Tal1cint atal1; 305typedef _Complex unsigned int Tal1cuint atal1; 306typedef _Complex long int Tal1clong atal1; 307typedef _Complex unsigned long int Tal1culong atal1; 308typedef _Complex long long int Tal1cllong atal1; 309typedef _Complex unsigned long long int Tal1cullong atal1; 310#endif 311typedef float Tal1float atal1; 312typedef double Tal1double atal1; 313typedef long double Tal1ldouble atal1; 314#ifndef SKIP_DECIMAL_FLOAT 315typedef _Decimal32 Tal1Decimal32 atal1; 316typedef _Decimal64 Tal1Decimal64 atal1; 317typedef _Decimal128 Tal1Decimal128 atal1; 318#endif 319#ifndef SKIP_COMPLEX 320typedef _Complex float Tal1cfloat atal1; 321typedef _Complex double Tal1cdouble atal1; 322typedef _Complex long double Tal1cldouble atal1; 323#endif 324typedef bool Tal1bool atal1; 325typedef enum E0 Tal1E0 atal1; 326typedef enum E1 Tal1E1 atal1; 327typedef enum E2 Tal1E2 atal1; 328typedef enum E3 Tal1E3 atal1; 329typedef enum E4 Tal1E4 atal1; 330typedef enum E5 Tal1E5 atal1; 331typedef enum E6 Tal1E6 atal1; 332typedef enum E7 Tal1E7 atal1; 333typedef enum E8 Tal1E8 atal1; 334typedef enum E9 Tal1E9 atal1; 335typedef void *Tal1ptr atal1; 336typedef char *Tal1cptr atal1; 337typedef int *Tal1iptr atal1; 338typedef char Tal2char atal2; 339typedef signed char Tal2schar atal2; 340typedef unsigned char Tal2uchar atal2; 341typedef short int Tal2short atal2; 342typedef unsigned short int Tal2ushort atal2; 343typedef int Tal2int atal2; 344typedef unsigned int Tal2uint atal2; 345typedef long int Tal2long atal2; 346typedef unsigned long int Tal2ulong atal2; 347typedef long long int Tal2llong atal2; 348typedef unsigned long long int Tal2ullong atal2; 349#ifndef SKIP_COMPLEX_INT 350typedef _Complex char Tal2cchar atal2; 351typedef _Complex signed char Tal2cschar atal2; 352typedef _Complex unsigned char Tal2cuchar atal2; 353typedef _Complex short int Tal2cshort atal2; 354typedef _Complex unsigned short int Tal2cushort atal2; 355typedef _Complex int Tal2cint atal2; 356typedef _Complex unsigned int Tal2cuint atal2; 357typedef _Complex long int Tal2clong atal2; 358typedef _Complex unsigned long int Tal2culong atal2; 359typedef _Complex long long int Tal2cllong atal2; 360typedef _Complex unsigned long long int Tal2cullong atal2; 361#endif 362typedef float Tal2float atal2; 363typedef double Tal2double atal2; 364typedef long double Tal2ldouble atal2; 365#ifndef SKIP_DECIMAL_FLOAT 366typedef _Decimal32 Tal2Decimal32 atal2; 367typedef _Decimal64 Tal2Decimal64 atal2; 368typedef _Decimal128 Tal2Decimal128 atal2; 369#endif 370#ifndef SKIP_COMPLEX 371typedef _Complex float Tal2cfloat atal2; 372typedef _Complex double Tal2cdouble atal2; 373typedef _Complex long double Tal2cldouble atal2; 374#endif 375typedef bool Tal2bool atal2; 376typedef enum E0 Tal2E0 atal2; 377typedef enum E1 Tal2E1 atal2; 378typedef enum E2 Tal2E2 atal2; 379typedef enum E3 Tal2E3 atal2; 380typedef enum E4 Tal2E4 atal2; 381typedef enum E5 Tal2E5 atal2; 382typedef enum E6 Tal2E6 atal2; 383typedef enum E7 Tal2E7 atal2; 384typedef enum E8 Tal2E8 atal2; 385typedef enum E9 Tal2E9 atal2; 386typedef void *Tal2ptr atal2; 387typedef char *Tal2cptr atal2; 388typedef int *Tal2iptr atal2; 389typedef char Tal4char atal4; 390typedef signed char Tal4schar atal4; 391typedef unsigned char Tal4uchar atal4; 392typedef short int Tal4short atal4; 393typedef unsigned short int Tal4ushort atal4; 394typedef int Tal4int atal4; 395typedef unsigned int Tal4uint atal4; 396typedef long int Tal4long atal4; 397typedef unsigned long int Tal4ulong atal4; 398typedef long long int Tal4llong atal4; 399typedef unsigned long long int Tal4ullong atal4; 400#ifndef SKIP_COMPLEX_INT 401typedef _Complex char Tal4cchar atal4; 402typedef _Complex signed char Tal4cschar atal4; 403typedef _Complex unsigned char Tal4cuchar atal4; 404typedef _Complex short int Tal4cshort atal4; 405typedef _Complex unsigned short int Tal4cushort atal4; 406typedef _Complex int Tal4cint atal4; 407typedef _Complex unsigned int Tal4cuint atal4; 408typedef _Complex long int Tal4clong atal4; 409typedef _Complex unsigned long int Tal4culong atal4; 410typedef _Complex long long int Tal4cllong atal4; 411typedef _Complex unsigned long long int Tal4cullong atal4; 412#endif 413typedef float Tal4float atal4; 414typedef double Tal4double atal4; 415typedef long double Tal4ldouble atal4; 416#ifndef SKIP_DECIMAL_FLOAT 417typedef _Decimal32 Tal4Decimal32 atal4; 418typedef _Decimal64 Tal4Decimal64 atal4; 419typedef _Decimal128 Tal4Decimal128 atal4; 420#endif 421#ifndef SKIP_COMPLEX 422typedef _Complex float Tal4cfloat atal4; 423typedef _Complex double Tal4cdouble atal4; 424typedef _Complex long double Tal4cldouble atal4; 425#endif 426typedef bool Tal4bool atal4; 427typedef enum E0 Tal4E0 atal4; 428typedef enum E1 Tal4E1 atal4; 429typedef enum E2 Tal4E2 atal4; 430typedef enum E3 Tal4E3 atal4; 431typedef enum E4 Tal4E4 atal4; 432typedef enum E5 Tal4E5 atal4; 433typedef enum E6 Tal4E6 atal4; 434typedef enum E7 Tal4E7 atal4; 435typedef enum E8 Tal4E8 atal4; 436typedef enum E9 Tal4E9 atal4; 437typedef void *Tal4ptr atal4; 438typedef char *Tal4cptr atal4; 439typedef int *Tal4iptr atal4; 440typedef char Tal8char atal8; 441typedef signed char Tal8schar atal8; 442typedef unsigned char Tal8uchar atal8; 443typedef short int Tal8short atal8; 444typedef unsigned short int Tal8ushort atal8; 445typedef int Tal8int atal8; 446typedef unsigned int Tal8uint atal8; 447typedef long int Tal8long atal8; 448typedef unsigned long int Tal8ulong atal8; 449typedef long long int Tal8llong atal8; 450typedef unsigned long long int Tal8ullong atal8; 451#ifndef SKIP_COMPLEX_INT 452typedef _Complex char Tal8cchar atal8; 453typedef _Complex signed char Tal8cschar atal8; 454typedef _Complex unsigned char Tal8cuchar atal8; 455typedef _Complex short int Tal8cshort atal8; 456typedef _Complex unsigned short int Tal8cushort atal8; 457typedef _Complex int Tal8cint atal8; 458typedef _Complex unsigned int Tal8cuint atal8; 459typedef _Complex long int Tal8clong atal8; 460typedef _Complex unsigned long int Tal8culong atal8; 461typedef _Complex long long int Tal8cllong atal8; 462typedef _Complex unsigned long long int Tal8cullong atal8; 463#endif 464typedef float Tal8float atal8; 465typedef double Tal8double atal8; 466typedef long double Tal8ldouble atal8; 467#ifndef SKIP_DECIMAL_FLOAT 468typedef _Decimal32 Tal8Decimal32 atal8; 469typedef _Decimal64 Tal8Decimal64 atal8; 470typedef _Decimal128 Tal8Decimal128 atal8; 471#endif 472#ifndef SKIP_COMPLEX 473typedef _Complex float Tal8cfloat atal8; 474typedef _Complex double Tal8cdouble atal8; 475typedef _Complex long double Tal8cldouble atal8; 476#endif 477typedef bool Tal8bool atal8; 478typedef enum E0 Tal8E0 atal8; 479typedef enum E1 Tal8E1 atal8; 480typedef enum E2 Tal8E2 atal8; 481typedef enum E3 Tal8E3 atal8; 482typedef enum E4 Tal8E4 atal8; 483typedef enum E5 Tal8E5 atal8; 484typedef enum E6 Tal8E6 atal8; 485typedef enum E7 Tal8E7 atal8; 486typedef enum E8 Tal8E8 atal8; 487typedef enum E9 Tal8E9 atal8; 488typedef void *Tal8ptr atal8; 489typedef char *Tal8cptr atal8; 490typedef int *Tal8iptr atal8; 491typedef char Tal16char atal16; 492typedef signed char Tal16schar atal16; 493typedef unsigned char Tal16uchar atal16; 494typedef short int Tal16short atal16; 495typedef unsigned short int Tal16ushort atal16; 496typedef int Tal16int atal16; 497typedef unsigned int Tal16uint atal16; 498typedef long int Tal16long atal16; 499typedef unsigned long int Tal16ulong atal16; 500typedef long long int Tal16llong atal16; 501typedef unsigned long long int Tal16ullong atal16; 502#ifndef SKIP_COMPLEX_INT 503typedef _Complex char Tal16cchar atal16; 504typedef _Complex signed char Tal16cschar atal16; 505typedef _Complex unsigned char Tal16cuchar atal16; 506typedef _Complex short int Tal16cshort atal16; 507typedef _Complex unsigned short int Tal16cushort atal16; 508typedef _Complex int Tal16cint atal16; 509typedef _Complex unsigned int Tal16cuint atal16; 510typedef _Complex long int Tal16clong atal16; 511typedef _Complex unsigned long int Tal16culong atal16; 512typedef _Complex long long int Tal16cllong atal16; 513typedef _Complex unsigned long long int Tal16cullong atal16; 514#endif 515typedef float Tal16float atal16; 516typedef double Tal16double atal16; 517typedef long double Tal16ldouble atal16; 518#ifndef SKIP_DECIMAL_FLOAT 519typedef _Decimal32 Tal16Decimal32 atal16; 520typedef _Decimal64 Tal16Decimal64 atal16; 521typedef _Decimal128 Tal16Decimal128 atal16; 522#endif 523#ifndef SKIP_COMPLEX 524typedef _Complex float Tal16cfloat atal16; 525typedef _Complex double Tal16cdouble atal16; 526typedef _Complex long double Tal16cldouble atal16; 527#endif 528typedef bool Tal16bool atal16; 529typedef enum E0 Tal16E0 atal16; 530typedef enum E1 Tal16E1 atal16; 531typedef enum E2 Tal16E2 atal16; 532typedef enum E3 Tal16E3 atal16; 533typedef enum E4 Tal16E4 atal16; 534typedef enum E5 Tal16E5 atal16; 535typedef enum E6 Tal16E6 atal16; 536typedef enum E7 Tal16E7 atal16; 537typedef enum E8 Tal16E8 atal16; 538typedef enum E9 Tal16E9 atal16; 539typedef void *Tal16ptr atal16; 540typedef char *Tal16cptr atal16; 541typedef int *Tal16iptr atal16; 542typedef char Talx1char atalx1; 543typedef signed char Talx1schar atalx1; 544typedef unsigned char Talx1uchar atalx1; 545typedef short int Talx1short atalx1; 546typedef unsigned short int Talx1ushort atalx1; 547typedef int Talx1int atalx1; 548typedef unsigned int Talx1uint atalx1; 549typedef long int Talx1long atalx1; 550typedef unsigned long int Talx1ulong atalx1; 551typedef long long int Talx1llong atalx1; 552typedef unsigned long long int Talx1ullong atalx1; 553#ifndef SKIP_COMPLEX_INT 554typedef _Complex char Talx1cchar atalx1; 555typedef _Complex signed char Talx1cschar atalx1; 556typedef _Complex unsigned char Talx1cuchar atalx1; 557typedef _Complex short int Talx1cshort atalx1; 558typedef _Complex unsigned short int Talx1cushort atalx1; 559typedef _Complex int Talx1cint atalx1; 560typedef _Complex unsigned int Talx1cuint atalx1; 561typedef _Complex long int Talx1clong atalx1; 562typedef _Complex unsigned long int Talx1culong atalx1; 563typedef _Complex long long int Talx1cllong atalx1; 564typedef _Complex unsigned long long int Talx1cullong atalx1; 565#endif 566typedef float Talx1float atalx1; 567typedef double Talx1double atalx1; 568typedef long double Talx1ldouble atalx1; 569#ifndef SKIP_DECIMAL_FLOAT 570typedef _Decimal32 Talx1Decimal32 atalx1; 571typedef _Decimal64 Talx1Decimal64 atalx1; 572typedef _Decimal128 Talx1Decimal128 atalx1; 573#endif 574#ifndef SKIP_COMPLEX 575typedef _Complex float Talx1cfloat atalx1; 576typedef _Complex double Talx1cdouble atalx1; 577typedef _Complex long double Talx1cldouble atalx1; 578#endif 579typedef bool Talx1bool atalx1; 580typedef enum E0 Talx1E0 atalx1; 581typedef enum E1 Talx1E1 atalx1; 582typedef enum E2 Talx1E2 atalx1; 583typedef enum E3 Talx1E3 atalx1; 584typedef enum E4 Talx1E4 atalx1; 585typedef enum E5 Talx1E5 atalx1; 586typedef enum E6 Talx1E6 atalx1; 587typedef enum E7 Talx1E7 atalx1; 588typedef enum E8 Talx1E8 atalx1; 589typedef enum E9 Talx1E9 atalx1; 590typedef void *Talx1ptr atalx1; 591typedef char *Talx1cptr atalx1; 592typedef int *Talx1iptr atalx1; 593typedef short int Talx2short atalx2; 594typedef unsigned short int Talx2ushort atalx2; 595typedef int Talx2int atalx2; 596typedef unsigned int Talx2uint atalx2; 597typedef long int Talx2long atalx2; 598typedef unsigned long int Talx2ulong atalx2; 599typedef long long int Talx2llong atalx2; 600typedef unsigned long long int Talx2ullong atalx2; 601#ifndef SKIP_COMPLEX_INT 602typedef _Complex char Talx2cchar atalx2; 603typedef _Complex signed char Talx2cschar atalx2; 604typedef _Complex unsigned char Talx2cuchar atalx2; 605typedef _Complex short int Talx2cshort atalx2; 606typedef _Complex unsigned short int Talx2cushort atalx2; 607typedef _Complex int Talx2cint atalx2; 608typedef _Complex unsigned int Talx2cuint atalx2; 609typedef _Complex long int Talx2clong atalx2; 610typedef _Complex unsigned long int Talx2culong atalx2; 611typedef _Complex long long int Talx2cllong atalx2; 612typedef _Complex unsigned long long int Talx2cullong atalx2; 613#endif 614typedef float Talx2float atalx2; 615typedef double Talx2double atalx2; 616typedef long double Talx2ldouble atalx2; 617#ifndef SKIP_DECIMAL_FLOAT 618typedef _Decimal32 Talx2Decimal32 atalx2; 619typedef _Decimal64 Talx2Decimal64 atalx2; 620typedef _Decimal128 Talx2Decimal128 atalx2; 621#endif 622#ifndef SKIP_COMPLEX 623typedef _Complex float Talx2cfloat atalx2; 624typedef _Complex double Talx2cdouble atalx2; 625typedef _Complex long double Talx2cldouble atalx2; 626#endif 627typedef enum E0 Talx2E0 atalx2; 628typedef enum E1 Talx2E1 atalx2; 629typedef enum E2 Talx2E2 atalx2; 630typedef enum E3 Talx2E3 atalx2; 631typedef enum E4 Talx2E4 atalx2; 632typedef enum E5 Talx2E5 atalx2; 633typedef enum E6 Talx2E6 atalx2; 634typedef enum E7 Talx2E7 atalx2; 635typedef enum E8 Talx2E8 atalx2; 636typedef enum E9 Talx2E9 atalx2; 637typedef void *Talx2ptr atalx2; 638typedef char *Talx2cptr atalx2; 639typedef int *Talx2iptr atalx2; 640typedef int Talx4int atalx4; 641typedef unsigned int Talx4uint atalx4; 642typedef long int Talx4long atalx4; 643typedef unsigned long int Talx4ulong atalx4; 644typedef long long int Talx4llong atalx4; 645typedef unsigned long long int Talx4ullong atalx4; 646#ifndef SKIP_COMPLEX_INT 647typedef _Complex short int Talx4cshort atalx4; 648typedef _Complex unsigned short int Talx4cushort atalx4; 649typedef _Complex int Talx4cint atalx4; 650typedef _Complex unsigned int Talx4cuint atalx4; 651typedef _Complex long int Talx4clong atalx4; 652typedef _Complex unsigned long int Talx4culong atalx4; 653typedef _Complex long long int Talx4cllong atalx4; 654typedef _Complex unsigned long long int Talx4cullong atalx4; 655#endif 656typedef float Talx4float atalx4; 657typedef double Talx4double atalx4; 658typedef long double Talx4ldouble atalx4; 659#ifndef SKIP_DECIMAL_FLOAT 660typedef _Decimal32 Talx4Decimal32 atalx4; 661typedef _Decimal64 Talx4Decimal64 atalx4; 662typedef _Decimal128 Talx4Decimal128 atalx4; 663#endif 664#ifndef SKIP_COMPLEX 665typedef _Complex float Talx4cfloat atalx4; 666typedef _Complex double Talx4cdouble atalx4; 667typedef _Complex long double Talx4cldouble atalx4; 668#endif 669typedef enum E0 Talx4E0 atalx4; 670typedef enum E1 Talx4E1 atalx4; 671typedef enum E2 Talx4E2 atalx4; 672typedef enum E3 Talx4E3 atalx4; 673typedef enum E4 Talx4E4 atalx4; 674typedef enum E5 Talx4E5 atalx4; 675typedef enum E6 Talx4E6 atalx4; 676typedef enum E7 Talx4E7 atalx4; 677typedef enum E8 Talx4E8 atalx4; 678typedef enum E9 Talx4E9 atalx4; 679typedef void *Talx4ptr atalx4; 680typedef char *Talx4cptr atalx4; 681typedef int *Talx4iptr atalx4; 682typedef long int Taly8long ataly8; 683typedef unsigned long int Taly8ulong ataly8; 684typedef long long int Talx8llong atalx8; 685typedef unsigned long long int Talx8ullong atalx8; 686#ifndef SKIP_COMPLEX_INT 687typedef _Complex int Talx8cint atalx8; 688typedef _Complex unsigned int Talx8cuint atalx8; 689typedef _Complex long int Talx8clong atalx8; 690typedef _Complex unsigned long int Talx8culong atalx8; 691typedef _Complex long long int Talx8cllong atalx8; 692typedef _Complex unsigned long long int Talx8cullong atalx8; 693#endif 694typedef double Talx8double atalx8; 695typedef long double Talx8ldouble atalx8; 696#ifndef SKIP_DECIMAL_FLOAT 697typedef _Decimal64 Talx8Decimal64 atalx8; 698typedef _Decimal128 Talx8Decimal128 atalx8; 699#endif 700#ifndef SKIP_COMPLEX 701typedef _Complex float Talx8cfloat atalx8; 702typedef _Complex double Talx8cdouble atalx8; 703typedef _Complex long double Talx8cldouble atalx8; 704#endif 705typedef void *Taly8ptr ataly8; 706typedef char *Taly8cptr ataly8; 707typedef int *Taly8iptr ataly8; 708#ifndef SKIP_COMPLEX_INT 709typedef _Complex long int Taly16clong ataly16; 710typedef _Complex unsigned long int Taly16culong ataly16; 711typedef _Complex long long int Talx16cllong atalx16; 712typedef _Complex unsigned long long int Talx16cullong atalx16; 713#endif 714#ifndef SKIP_COMPLEX 715typedef _Complex double Talx16cdouble atalx16; 716typedef _Complex long double Talx16cldouble atalx16; 717#endif 718typedef int (*Tfnptr) (void); 719 720/* Bitfield macros. In C, it is invalid to use numbers larger 721 than type's bitsize, but we don't know the size when generating 722 the testcases. */ 723#define BN8(n) ((((n) - 1) & 7) + 1) 724#define BN16(n) ((((n) - 1) & 15) + 1) 725#define BN32(n) ((((n) - 1) & 31) + 1) 726#define BN64(n) ((((n) - 1) & 63) + 1) 727#define BCN(n) BN8 (n) 728#if USHRT_MAX == 255 729# define BSN(n) BN8 (n) 730#elif USHRT_MAX == 65535 731# define BSN(n) BN16 (n) 732#elif USHRT_MAX == 4294967295U 733# define BSN(n) BN32 (n) 734#elif USHRT_MAX == 18446744073709551615ULL 735# define BSN(n) BN64 (n) 736#endif 737#if UINT_MAX == 255 738# define BIN(n) BN8 (n) 739#elif UINT_MAX == 65535 740# define BIN(n) BN16 (n) 741#elif UINT_MAX == 4294967295U 742# define BIN(n) BN32 (n) 743#elif UINT_MAX == 18446744073709551615ULL 744# define BIN(n) BN64 (n) 745#endif 746#if ULONG_MAX == 255 747# define BLN(n) BN8 (n) 748#elif ULONG_MAX == 65535 749# define BLN(n) BN16 (n) 750#elif ULONG_MAX == 4294967295U 751# define BLN(n) BN32 (n) 752#elif ULONG_MAX == 18446744073709551615ULL 753# define BLN(n) BN64 (n) 754#endif 755#if ULONG_MAX == 255 756# define BLN(n) BN8 (n) 757#elif ULONG_MAX == 65535 758# define BLN(n) BN16 (n) 759#elif ULONG_MAX == 4294967295U 760# define BLN(n) BN32 (n) 761#elif ULONG_MAX == 18446744073709551615ULL 762# define BLN(n) BN64 (n) 763#endif 764#if !defined ULLONG_MAX && defined __LONG_LONG_MAX__ 765# define ULLONG_MAX (__LONG_LONG_MAX__ * 2ULL + 1ULL) 766#endif 767#if ULLONG_MAX == 255 768# define BQN(n) BN8 (n) 769#elif ULLONG_MAX == 65535 770# define BQN(n) BN16 (n) 771#elif ULLONG_MAX == 4294967295U 772# define BQN(n) BN32 (n) 773#elif ULLONG_MAX == 18446744073709551615ULL 774# define BQN(n) BN64 (n) 775#endif 776 777#define T(n, fields, ops) TX(n, struct, , fields, ({ ops });) 778#define U(n, fields, ops) TX(n, union, , fields, ({ ops });) 779#ifdef SKIP_COMPLEX_INT 780#define TXCI(n, type, attrs, fields, ops) 781#define TCI(n, fields, ops) 782#define UCI(n, fields, ops) 783#else 784#define TXCI(n, type, attrs, fields, ops) TX(n, type, attrs, fields, ({ ops });) 785#define TCI(n, fields, ops) TX(n, struct, , fields, ({ ops });) 786#define UCI(n, fields, ops) TX(n, union, , fields, ({ ops });) 787#endif 788