ORCA-C/Tests/Conformance/c99desinit.c

209 lines
5.8 KiB
C
Raw Normal View History

2022-12-05 03:26:40 +00:00
/*
* Test of designated initializers (C99).
*/
#include <stdio.h>
#include <string.h>
#include <stdlib.h>
#ifndef __ORCAC__
typedef long long comp;
#endif
struct S1 {
int i;
union {
long x;
char y;
} u;
short a[3];
} s1 = {8, .a[0] = 9, .u.y = 'F', .i = 50, .a = {[1]=1,2}, .a[1] = 10};
struct S2 {
char c;
unsigned char uc;
signed char sc;
short s;
unsigned short us;
int i;
unsigned int ui;
long l;
unsigned long ul;
long long ll;
unsigned long long ull;
_Bool b;
float f;
double d;
long double ld;
comp cp;
void *p;
} s2 = {.p = &s2, .i = 123.4, .ui = 70, -123456, 123456, .c = 'd', 'e', 'f',
.us = 78, .s = 40.1, .ll = 1234567890, 0x800000001, 123, 123.5,
.cp = 9876543210, .d = -456.5, -789.5,
};
struct S3 {
float f;
double d;
long double ld;
} s3 = {-123456LL, 3000000000U, 12345678900ULL};
char s4[] = {{123}, [3] = {'x'}};
struct S5 {
int :16;
signed int a:4;
signed int b:6;
signed int c:6;
int :0;
unsigned d:9;
int :12;
unsigned e:4;
unsigned f:16;
long g;
int :15;
} s5 = {-4, -5, 3, .g = 123456789, .d = 455, 8, 42345};
char *s6[4] = {s4, s4+1, [0]=0, [1]=s4+2, &s4[3], s4+4};
union U9 {
union U9 *p;
char s[6];
} s9 = {&s9, .s = {"abcde"}, .s[1] = 'x'};
union U9 s10 = {&s9, .s = {"abcde"}, .s[1] = 'x', .p = &s10};
union U9 s11 = {&s9, .s[1] = 'x'};
struct S13 {
struct S13a {
struct S13b {
struct S13c {
int a;
int b;
} z;
} y;
} x;
} s13 = {13, .x.y.z = {.b = 14}};
int f1(int i) {return i * 2 + 1;}
int main(void) {
struct S1 a1 =
{8, .a[0] = 9, .u.y = 'F', .i = 50, .a = {[1]=1,2}, .a[1] = 10};
struct S2 a2 =
{.p = &s2, .i = 123.4, .ui = 70, -123456, 123456, .c = 'd', 'e', 'f',
.us = 78, .s = 40.1, .ll = 1234567890, 0x800000001, 123, 123.5,
.cp = 9876543210, .d = -456.5, -789.5,
};
struct S3 a3 = {-123456LL, 3000000000U, 12345678900ULL};
char a4[] = {{123}, [3] = {'x'}};
struct S5 a5 = {-4, -5, 3, .g = 123456789, .d = 455, 8, 42345};
char *a6[4] = {s4, s4+1, [0]=0, [1]=s4+2, &s4[3], s4+4};
char a7[] = {"foo"[0], [1] = "foo"[2], "foo"[3]};
char a8[] = {"foo" != 0, [1] = "foo" == 0};
union U9 a9 = {&s9, .s = {"abcde"}, .s[1] = 'x'};
union U9 a10 = {&s9, .s = {"abcde"}, .s[1] = 'x', .p = &s10};
union U9 a11 = {&s9, .s[1] = 'x'};
struct S3 a12 = {.ld = f1(1)-8, .f = f1(2)*7, f1(3)+10};
struct S13 a13 = {s13.x.y};
if (s1.i!=50 || s1.u.y!='F' || s1.a[0]!=0 || s1.a[1]!=10 || s1.a[2]!=2)
goto Fail;
if (a1.i!=50 || a1.u.y!='F' || a1.a[0]!=0 || a1.a[1]!=10 || a1.a[2]!=2)
goto Fail;
if (s2.c != 'd' || s2.uc != 'e' || s2.sc != 'f' || s2.s != 40
|| s2.us != 78 || s2.i != 123 || s2.ui != 70 || s2.l != -123456
|| s2.ul != 123456 || s2.ll != 1234567890
|| s2.ull != 0x800000001 || s2.b != 1 || s2.f != 123.5
|| s2.d != -456.5 || s2.ld != -789.5 || s2.cp != 9876543210
|| s2.p != &s2)
goto Fail;
if (a2.c != 'd' || a2.uc != 'e' || a2.sc != 'f' || a2.s != 40
|| a2.us != 78 || a2.i != 123 || a2.ui != 70 || a2.l != -123456
|| a2.ul != 123456 || a2.ll != 1234567890
|| a2.ull != 0x800000001 || a2.b != 1 || a2.f != 123.5
|| a2.d != -456.5 || a2.ld != -789.5 || a2.cp != 9876543210
|| a2.p != &s2)
goto Fail;
if (s3.f != -123456.0 || s3.d != 3000000000.0 || s3.ld != 12345678900.0)
goto Fail;
if (a3.f != -123456.0 || a3.d != 3000000000.0 || a3.ld != 12345678900.0)
goto Fail;
if (sizeof(s4) != 4 || s4[0] != 123 || s4[1] != 0 || s4[2] != 0
|| s4[3] != 'x')
goto Fail;
if (sizeof(a4) != 4 || a4[0] != 123 || a4[1] != 0 || a4[2] != 0
|| a4[3] != 'x')
goto Fail;
if (s5.a != -4 || s5.b != -5 || s5.c != 3 || s5.d != 455 || s5.e != 8
|| s5.f != 42345 || s5.g != 123456789)
goto Fail;
if (a5.a != -4 || a5.b != -5 || a5.c != 3 || a5.d != 455 || a5.e != 8
|| a5.f != 42345 || a5.g != 123456789)
goto Fail;
if (s6[0] != 0 || s6[1] != &s4[2] || s6[2] != &s4[3] || s6[3] != s4+4)
goto Fail;
if (a6[0] != 0 || a6[1] != &s4[2] || a6[2] != &s4[3] || a6[3] != s4+4)
goto Fail;
if (sizeof(a7) != 3 || a7[0] != 'f' || a7[1] != 'o' || a7[2] != 0)
goto Fail;
if (sizeof(a8) != 2 || a8[0] != 1 || a8[1] != 0)
goto Fail;
if (strcmp(s9.s, "axcde") != 0)
goto Fail;
if (strcmp(a9.s, "axcde") != 0)
goto Fail;
if (s10.p != &s10)
goto Fail;
if (a10.p != &s10)
goto Fail;
if (s11.s[1] != 'x')
goto Fail;
if (a11.s[1] != 'x')
goto Fail;
if (a12.f != 35 || a12.d != 17 || a12.ld != -5)
goto Fail;
if (a13.x.y.z.a != 0 || a13.x.y.z.b != 14)
goto Fail;
printf ("Passed Conformance Test c99desinit\n");
return 0;
Fail:
printf ("Failed Conformance Test c99desinit\n");
}