Mercurial > hg > CbC > old > device
annotate test/tmp7.c @ 602:429ec87e03e7
*** empty log message ***
author | kono |
---|---|
date | Fri, 27 Jan 2006 14:35:38 +0900 |
parents | aad312f61654 |
children | 4d28634e46e4 |
rev | line source |
---|---|
467 | 1 int printf(const char *format, ...); |
574 | 2 #ifndef INLINE |
3 #define INLINE | |
4 #endif | |
13 | 5 int k=3; |
6 struct aa { int a[100]; } aaa,bbb; | |
258
22949117768f
Complex function argments. Struct is done. Long long is odd.
kono
parents:
172
diff
changeset
|
7 struct bb { int b[2]; } aaa1,bbb1; |
574 | 8 INLINE void tmp(void); |
13 | 9 |
574 | 10 INLINE struct aa |
45 | 11 main0(int); |
0 | 12 |
574 | 13 INLINE struct aa |
45 | 14 main0(int k) |
0 | 15 { |
39 | 16 int i; |
16 | 17 struct aa ccc; |
39 | 18 |
19 for(i=0;i<100;i++) ccc.a[i]=i; | |
45 | 20 ccc.a[55]=k; |
16 | 21 return ccc; |
0 | 22 } |
23 | |
574 | 24 INLINE struct aa |
45 | 25 main3(struct aa arg) |
26 { | |
27 int j=++arg.a[55]; | |
28 return main0(j); | |
29 } | |
30 | |
574 | 31 INLINE void |
8 | 32 main2(struct aa a1) |
33 { | |
37 | 34 /* main2 a1.a[99] 0 */ |
35 /* main2 a1.a[55] 0 */ | |
36 /* main2 a1.a[99] 55 */ | |
37 /* main2 a1.a[55] 44 */ | |
491 | 38 printf("#0038:main2 a1.a[99] %d\n",a1.a[99]); |
39 printf("#0039:main2 a1.a[55] %d\n",a1.a[55]); | |
8 | 40 } |
41 | |
574 | 42 INLINE struct bb |
258
22949117768f
Complex function argments. Struct is done. Long long is odd.
kono
parents:
172
diff
changeset
|
43 main5(struct aa a1,struct bb a2) |
22949117768f
Complex function argments. Struct is done. Long long is odd.
kono
parents:
172
diff
changeset
|
44 { |
491 | 45 printf("#0045:main5 a1.a[99] %d\n",a1.a[99]); |
46 printf("#0046:main5 a1.a[55] %d\n",a1.a[55]); | |
47 printf("#0047:main5 a2.b[0] %d\n",a2.b[0]); | |
48 printf("#0048:main5 a2.b[1] %d\n",a2.b[1]); | |
258
22949117768f
Complex function argments. Struct is done. Long long is odd.
kono
parents:
172
diff
changeset
|
49 a2.b[0]=333; |
22949117768f
Complex function argments. Struct is done. Long long is odd.
kono
parents:
172
diff
changeset
|
50 a2.b[1]=555; |
22949117768f
Complex function argments. Struct is done. Long long is odd.
kono
parents:
172
diff
changeset
|
51 return a2; |
22949117768f
Complex function argments. Struct is done. Long long is odd.
kono
parents:
172
diff
changeset
|
52 } |
22949117768f
Complex function argments. Struct is done. Long long is odd.
kono
parents:
172
diff
changeset
|
53 |
22949117768f
Complex function argments. Struct is done. Long long is odd.
kono
parents:
172
diff
changeset
|
54 |
574 | 55 INLINE void |
0 | 56 main1(struct aa a1) |
57 { | |
37 | 58 /* main1 a1.a[0] 0 */ |
59 /* main1 a1.a[0] 44 */ | |
491 | 60 printf("#0060:main1 a1.a[0] %d\n",a1.a[0]); |
15 | 61 a1.a[55]=44; |
0 | 62 if (a1.a[0]) |
8 | 63 main2(a1); |
0 | 64 else |
8 | 65 main2(aaa); |
0 | 66 } |
67 | |
487 | 68 int |
0 | 69 main(ac,av) |
70 int ac; | |
71 char *av[]; | |
72 { | |
73 register int i; | |
74 register char *p; | |
75 int j = 3; | |
16 | 76 struct { int b; void (*c)(struct aa); } q = {3,main1},r; |
39 | 77 struct aa *aap[3]; |
0 | 78 |
79 j = 3; | |
80 | |
45 | 81 bbb = main0(123); |
491 | 82 printf("#0082:copied main0 ccc.a[55] %d==123\n",bbb.a[55]); |
39 | 83 aap[2] = &bbb; |
45 | 84 *aap[2] = main0(123); |
491 | 85 printf("#0085:complex copied main0 ccc.a[55] %d==123\n",bbb.a[55]); |
39 | 86 bbb.a[55]=0; |
45 | 87 j = main0(123).a[55]; |
491 | 88 printf("#0088:new main0 ccc.a[55] in temporal copy %d==123\n",j); |
39 | 89 |
45 | 90 j = 552; |
91 bbb = main3(bbb); | |
491 | 92 printf("#0092:main3 bbb.a[55] in temporal copy %d==552 %d==1\n",j,bbb.a[55]); |
45 | 93 j = main3(bbb).a[55]; |
491 | 94 printf("#0094:main3 bbb.a[55] in temporal copy %d==2 %d\n",j,bbb.a[53]); |
45 | 95 j = main3(bbb).a[53]; |
491 | 96 printf("#0096:main3 bbb.a[55] in temporal copy %d==53 %d\n",j,bbb.a[53]); |
45 | 97 |
491 | 98 printf("#0098:%d==3\n",q.b); |
37 | 99 /* 3==3 */ |
0 | 100 r = q; |
491 | 101 printf("#0101:%d==3\n",r.b); |
37 | 102 /* 3==3 */ |
15 | 103 (*r.c)(aaa); |
491 | 104 printf("#0104:main aaa.a[55] %d\n",aaa.a[55]); |
37 | 105 /* main aaa.a[55] 123 */ |
15 | 106 bbb.a[0]=44; |
0 | 107 aaa = bbb; |
15 | 108 aaa.a[99]=55; /* core dump? */ |
109 (*r.c)(aaa); | |
37 | 110 /* main aaa.a[55] 0 */ |
491 | 111 printf("#0111:main aaa.a[55] %d\n",aaa.a[55]); |
8 | 112 p = av[0]; |
487 | 113 if (!p) return 55; |
0 | 114 i = p[1]; |
115 p = p+i; | |
37 | 116 /* 47 ./a.out */ |
491 | 117 printf("#0117:%d %s\n",i,p-i+3); |
258
22949117768f
Complex function argments. Struct is done. Long long is odd.
kono
parents:
172
diff
changeset
|
118 aaa1.b[0]=33; |
22949117768f
Complex function argments. Struct is done. Long long is odd.
kono
parents:
172
diff
changeset
|
119 aaa1.b[1]=55; |
22949117768f
Complex function argments. Struct is done. Long long is odd.
kono
parents:
172
diff
changeset
|
120 bbb1 = main5(aaa,aaa1); |
491 | 121 printf("#0121:main5-2 %d\n", |
258
22949117768f
Complex function argments. Struct is done. Long long is odd.
kono
parents:
172
diff
changeset
|
122 main5(bbb,bbb1).b[0]); |
491 | 123 printf("#0123:main5-1 %d\n", |
258
22949117768f
Complex function argments. Struct is done. Long long is odd.
kono
parents:
172
diff
changeset
|
124 main5(bbb,main5(aaa,aaa1)).b[0]); |
172 | 125 return 0; |
0 | 126 } |
127 | |
574 | 128 INLINE void |
0 | 129 tmp() |
130 { | |
131 } | |
37 | 132 |
133 |