Mercurial > hg > CbC > old > device

annotate test/too-long-argument.c @ 881:ab501cdbbefd

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
fix wrong src/dst type in pdecl_data_field
author Shinji KONO <kono@ie.u-ryukyu.ac.jp>
date Thu, 03 Apr 2014 17:49:05 +0900
parents 5313ed059cee
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
725
3f1f6c0610c1 goto with enviornment syntax changed.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 720
diff changeset
1 #define __environment _CbC_environment
3f1f6c0610c1 goto with enviornment syntax changed.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 720
diff changeset
2 #define __return _CbC_return
3f1f6c0610c1 goto with enviornment syntax changed.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 720
diff changeset
3
520
c562d1681275 *** empty log message ***
kono
parents: 519
diff changeset
4 #include <stdio.h>
c562d1681275 *** empty log message ***
kono
parents: 519
diff changeset
5
524
135afeb2e134 inline first work. no constant propagation.
kono
parents: 523
diff changeset
6 #undef WRONGNUMBER
135afeb2e134 inline first work. no constant propagation.
kono
parents: 523
diff changeset
7
622
682c8ec38d45 _code へ
kono
parents: 575
diff changeset
8 typedef __code
521
15c17f799404 *** empty log message ***
kono
parents: 520
diff changeset
9 (*CCC)( int f1,int f2,int f3,int f4,int f5,int f6,int f7,int f8,int f9,int fa,int fb,int fc,int fd,int fe,int ff,
880
5313ed059cee no tabs in source
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 748
diff changeset
10 __code(*ret)(int,void *),
5313ed059cee no tabs in source
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 748
diff changeset
11 void *env);
521
15c17f799404 *** empty log message ***
kono
parents: 520
diff changeset
12
622
682c8ec38d45 _code へ
kono
parents: 575
diff changeset
13 __code
520
c562d1681275 *** empty log message ***
kono
parents: 519
diff changeset
14 tcode2( int f1,int f2,int f3,int f4,int f5,int f6,int f7,int f8,int f9,int fa,int fb,int fc,int fd,int fe,int ff,
880
5313ed059cee no tabs in source
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 748
diff changeset
15 __code(*ret)(int,void *),
5313ed059cee no tabs in source
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 748
diff changeset
16 void *env)
520
c562d1681275 *** empty log message ***
kono
parents: 519
diff changeset
17 {
748
c2c709727221 i64 continue... basic.s assembled.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 725
diff changeset
18 fprintf(stdout,"#0017:tcode2: f1=%d,f2=%d,f3=%d,f4=%d,f5=%d,f6=%d,f7=%d,f8=%d,f9=%d,fa=%d,fb=%d,fc=%d,fd=%d,fe=%d,ff=%d\n",
520
c562d1681275 *** empty log message ***
kono
parents: 519
diff changeset
19 f1,f2,f3,f4,f5,f6,f7,f8,f9,fa,fb,fc,fd,fe,ff);
725
3f1f6c0610c1 goto with enviornment syntax changed.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 720
diff changeset
20 goto ret(0,env);
520
c562d1681275 *** empty log message ***
kono
parents: 519
diff changeset
21 }
c562d1681275 *** empty log message ***
kono
parents: 519
diff changeset
22
622
682c8ec38d45 _code へ
kono
parents: 575
diff changeset
23 __code
519
b6eb97f0c11d *** empty log message ***
kono
parents:
diff changeset
24 tcode1(f1,f2,f3,f4,f5,f6,f7,f8,f9,fa,fb,fc,fd,fe,ff,ret,env)
880
5313ed059cee no tabs in source
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 748
diff changeset
25 int f1,f2,f3,f4,f5,f6,f7,f8,f9,fa,fb,fc,fd,fe,ff;
5313ed059cee no tabs in source
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 748
diff changeset
26 __code(*ret)(int,void *);
5313ed059cee no tabs in source
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 748
diff changeset
27 void *env;
519
b6eb97f0c11d *** empty log message ***
kono
parents:
diff changeset
28 {
748
c2c709727221 i64 continue... basic.s assembled.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 725
diff changeset
29 fprintf(stdout,"#0028:tcode1: f1=%d,f2=%d,f3=%d,f4=%d,f5=%d,f6=%d,f7=%d,f8=%d,f9=%d,fa=%d,fb=%d,fc=%d,fd=%d,fe=%d,ff=%d\n",
520
c562d1681275 *** empty log message ***
kono
parents: 519
diff changeset
30 f1,f2,f3,f4,f5,f6,f7,f8,f9,fa,fb,fc,fd,fe,ff);
725
3f1f6c0610c1 goto with enviornment syntax changed.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 720
diff changeset
31 goto ret(0,env);
519
b6eb97f0c11d *** empty log message ***
kono
parents:
diff changeset
32 }
b6eb97f0c11d *** empty log message ***
kono
parents:
diff changeset
33
622
682c8ec38d45 _code へ
kono
parents: 575
diff changeset
34 __code
682c8ec38d45 _code へ
kono
parents: 575
diff changeset
35 tcode4(int x,int y,CCC junction,__code(*ret)(int),void *env)
519
b6eb97f0c11d *** empty log message ***
kono
parents:
diff changeset
36 {
524
135afeb2e134 inline first work. no constant propagation.
kono
parents: 523
diff changeset
37 #ifdef WRONGNUMBER
523
009289571b54 *** empty log message ***
kono
parents: 521
diff changeset
38 goto junction(0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,ret,env);
524
135afeb2e134 inline first work. no constant propagation.
kono
parents: 523
diff changeset
39 #else
135afeb2e134 inline first work. no constant propagation.
kono
parents: 523
diff changeset
40 goto junction(0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,ret,env);
135afeb2e134 inline first work. no constant propagation.
kono
parents: 523
diff changeset
41 #endif
521
15c17f799404 *** empty log message ***
kono
parents: 520
diff changeset
42 }
15c17f799404 *** empty log message ***
kono
parents: 520
diff changeset
43
622
682c8ec38d45 _code へ
kono
parents: 575
diff changeset
44 __code
682c8ec38d45 _code へ
kono
parents: 575
diff changeset
45 tcode0(int x,int y,__code(*junction)(int,int,int,int,int,int,int,int,int,int,int,int,int,int,int,__code(*)(int),void *),__code(*ret)(int),void *env)
521
15c17f799404 *** empty log message ***
kono
parents: 520
diff changeset
46 {
524
135afeb2e134 inline first work. no constant propagation.
kono
parents: 523
diff changeset
47 #ifdef WRONGNUMBER
523
009289571b54 *** empty log message ***
kono
parents: 521
diff changeset
48 goto junction(0,1,2,3,4,5,6,7,8,9,10,11,12,13,ret,env);
524
135afeb2e134 inline first work. no constant propagation.
kono
parents: 523
diff changeset
49 #else
135afeb2e134 inline first work. no constant propagation.
kono
parents: 523
diff changeset
50 goto junction(0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,ret,env);
135afeb2e134 inline first work. no constant propagation.
kono
parents: 523
diff changeset
51 #endif
519
b6eb97f0c11d *** empty log message ***
kono
parents:
diff changeset
52 }
b6eb97f0c11d *** empty log message ***
kono
parents:
diff changeset
53
b6eb97f0c11d *** empty log message ***
kono
parents:
diff changeset
54 int
520
c562d1681275 *** empty log message ***
kono
parents: 519
diff changeset
55 main0()
c562d1681275 *** empty log message ***
kono
parents: 519
diff changeset
56 {
524
135afeb2e134 inline first work. no constant propagation.
kono
parents: 523
diff changeset
57 #ifdef WRONGNUMBER
135afeb2e134 inline first work. no constant propagation.
kono
parents: 523
diff changeset
58 goto tcode2(0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,
880
5313ed059cee no tabs in source
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 748
diff changeset
59 __return,__environment);
524
135afeb2e134 inline first work. no constant propagation.
kono
parents: 523
diff changeset
60 #else
521
15c17f799404 *** empty log message ***
kono
parents: 520
diff changeset
61 goto tcode2(0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,
880
5313ed059cee no tabs in source
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 748
diff changeset
62 __return,__environment);
524
135afeb2e134 inline first work. no constant propagation.
kono
parents: 523
diff changeset
63 #endif
520
c562d1681275 *** empty log message ***
kono
parents: 519
diff changeset
64 }
c562d1681275 *** empty log message ***
kono
parents: 519
diff changeset
65
c562d1681275 *** empty log message ***
kono
parents: 519
diff changeset
66 int
c562d1681275 *** empty log message ***
kono
parents: 519
diff changeset
67 main1()
c562d1681275 *** empty log message ***
kono
parents: 519
diff changeset
68 {
524
135afeb2e134 inline first work. no constant propagation.
kono
parents: 523
diff changeset
69 #ifdef WRONGNUMBER
135afeb2e134 inline first work. no constant propagation.
kono
parents: 523
diff changeset
70 goto tcode1(0,1,2,3,4,5,6,7,8,9,10,11,12,13,
880
5313ed059cee no tabs in source
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 748
diff changeset
71 __return,__environment);
524
135afeb2e134 inline first work. no constant propagation.
kono
parents: 523
diff changeset
72 #else
521
15c17f799404 *** empty log message ***
kono
parents: 520
diff changeset
73 goto tcode1(0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,
880
5313ed059cee no tabs in source
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 748
diff changeset
74 __return,__environment);
524
135afeb2e134 inline first work. no constant propagation.
kono
parents: 523
diff changeset
75 #endif
520
c562d1681275 *** empty log message ***
kono
parents: 519
diff changeset
76 }
c562d1681275 *** empty log message ***
kono
parents: 519
diff changeset
77
c562d1681275 *** empty log message ***
kono
parents: 519
diff changeset
78 int
c562d1681275 *** empty log message ***
kono
parents: 519
diff changeset
79 main2()
519
b6eb97f0c11d *** empty log message ***
kono
parents:
diff changeset
80 {
720
6b7372e17970 *** empty log message ***
kono
parents: 622
diff changeset
81 goto tcode0(0,1,tcode1,__return,__environment);
519
b6eb97f0c11d *** empty log message ***
kono
parents:
diff changeset
82 }
520
c562d1681275 *** empty log message ***
kono
parents: 519
diff changeset
83
c562d1681275 *** empty log message ***
kono
parents: 519
diff changeset
84 int
521
15c17f799404 *** empty log message ***
kono
parents: 520
diff changeset
85 main4()
15c17f799404 *** empty log message ***
kono
parents: 520
diff changeset
86 {
720
6b7372e17970 *** empty log message ***
kono
parents: 622
diff changeset
87 goto tcode4(0,1,tcode2,__return,__environment);
521
15c17f799404 *** empty log message ***
kono
parents: 520
diff changeset
88 }
15c17f799404 *** empty log message ***
kono
parents: 520
diff changeset
89
15c17f799404 *** empty log message ***
kono
parents: 520
diff changeset
90 int
520
c562d1681275 *** empty log message ***
kono
parents: 519
diff changeset
91 main()
c562d1681275 *** empty log message ***
kono
parents: 519
diff changeset
92 {
748
c2c709727221 i64 continue... basic.s assembled.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 725
diff changeset
93 printf("#0092:main4\n");
521
15c17f799404 *** empty log message ***
kono
parents: 520
diff changeset
94 main4();
748
c2c709727221 i64 continue... basic.s assembled.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 725
diff changeset
95 printf("#0094:main2\n");
521
15c17f799404 *** empty log message ***
kono
parents: 520
diff changeset
96 main2();
748
c2c709727221 i64 continue... basic.s assembled.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 725
diff changeset
97 printf("#0096:main0\n");
520
c562d1681275 *** empty log message ***
kono
parents: 519
diff changeset
98 main0();
748
c2c709727221 i64 continue... basic.s assembled.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 725
diff changeset
99 printf("#0098:main1\n");
520
c562d1681275 *** empty log message ***
kono
parents: 519
diff changeset
100 main1();
575
a4445cb1aa91 Example filex.
kono
parents: 545
diff changeset
101 return 0;
520
c562d1681275 *** empty log message ***
kono
parents: 519
diff changeset
102 }
524
135afeb2e134 inline first work. no constant propagation.
kono
parents: 523
diff changeset
103
135afeb2e134 inline first work. no constant propagation.
kono
parents: 523
diff changeset
104 //