URL
https://opencores.org/ocsvn/openrisc/openrisc/trunk
Subversion Repositories openrisc
[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [g++.dg/] [compat/] [struct-layout-1_y2.h] - Rev 716
Go to most recent revision | Compare with Previous | Blame | View Log
#undef F #undef N #undef B #undef TX #ifdef SKIP_VA const int test_va = 0; #else const int test_va = 1; #endif #define F(n, x, v, w) \ if (p->x != arg.x) FAIL (n, 74); #define N(n, x) #define B(n, x, v, w) \ if (p->x != arg.x) FAIL (n, 74); #define TX(n, type, attrs, fields, ops) \ void \ check##n##va (int z, ...) \ { \ type S##n arg, *p; \ va_list ap; \ int i; \ \ if (test_va) \ { \ va_start (ap, z); \ for (i = 0; i < 5; ++i) \ { \ p = NULL; \ switch ((z << 4) | i) \ { \ case 0x10: \ if (va_arg (ap, double) != 1.0) \ FAIL (n, 70); \ break; \ case 0x12: \ if (va_arg (ap, long long) != 2LL) \ FAIL (n, 71); \ break; \ case 0x22: \ if (va_arg (ap, long double) != 2.0L) \ FAIL (n, 72); \ break; \ case 0x11: \ case 0x20: \ case 0x21: \ case 0x24: \ p = &s##n; \ arg = va_arg (ap, type S##n); \ break; \ case 0x13: \ case 0x14: \ case 0x23: \ p = &a##n[2]; \ arg = va_arg (ap, type S##n); \ break; \ default: \ FAIL (n, 73); \ break; \ } \ if (p) \ { \ ops \ } \ } \ va_end (ap); \ } \ }
Go to most recent revision | Compare with Previous | Blame | View Log