annotate gcc/testsuite/objc.dg/encode-11.m @ 158:494b0b89df80 default tip

...
author Shinji KONO <kono@ie.u-ryukyu.ac.jp>
date Mon, 25 May 2020 18:13:55 +0900
parents 04ced10e8804
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
111
kono
parents:
diff changeset
1 /* { dg-do run } */
kono
parents:
diff changeset
2
kono
parents:
diff changeset
3 extern void _exit(int);
kono
parents:
diff changeset
4 extern int strcmp(const char *, const char *);
kono
parents:
diff changeset
5
kono
parents:
diff changeset
6 typedef struct Vec {
kono
parents:
diff changeset
7 double xv[10], yv[5];
kono
parents:
diff changeset
8 float fscal;
kono
parents:
diff changeset
9 int z;
kono
parents:
diff changeset
10 } xyz_t ;
kono
parents:
diff changeset
11
kono
parents:
diff changeset
12 typedef struct {
kono
parents:
diff changeset
13 float fscalar;
kono
parents:
diff changeset
14 double dscalar;
kono
parents:
diff changeset
15 xyz_t dv;
kono
parents:
diff changeset
16 int iscalar;
kono
parents:
diff changeset
17 long ln;
kono
parents:
diff changeset
18 long long lln;
kono
parents:
diff changeset
19 } anonymous;
kono
parents:
diff changeset
20
kono
parents:
diff changeset
21 const char *enc = @encode(xyz_t);
kono
parents:
diff changeset
22 const char *enc2 = @encode(anonymous);
kono
parents:
diff changeset
23
kono
parents:
diff changeset
24 #ifdef __LP64__
kono
parents:
diff changeset
25 #define L "q"
kono
parents:
diff changeset
26 #else
kono
parents:
diff changeset
27 #define L "l"
kono
parents:
diff changeset
28 #endif
kono
parents:
diff changeset
29
kono
parents:
diff changeset
30 int main(void) {
kono
parents:
diff changeset
31 const char *encode = @encode(long);
kono
parents:
diff changeset
32
kono
parents:
diff changeset
33 if (strcmp (encode, L))
kono
parents:
diff changeset
34 _exit(-(__LINE__));
kono
parents:
diff changeset
35
kono
parents:
diff changeset
36 if (strcmp (enc, "{Vec=[10d][5d]fi}"))
kono
parents:
diff changeset
37 _exit(-(__LINE__));
kono
parents:
diff changeset
38
kono
parents:
diff changeset
39 if (strcmp (enc2, "{?=fd{Vec=[10d][5d]fi}i" L "q}"))
kono
parents:
diff changeset
40 _exit(-(__LINE__));
kono
parents:
diff changeset
41
kono
parents:
diff changeset
42 return 0;
kono
parents:
diff changeset
43 }