Mercurial > hg > CbC > old > device

annotate test/tmp4.c @ 868:c55337499f96

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
remove warnings and error from test
author Shinji KONO <kono@ie.u-ryukyu.ac.jp>
date Tue, 01 Apr 2014 02:42:22 +0900
parents c2c709727221
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
0
d35df41eac69 Initial revision
kono
parents:
diff changeset
4 #include "stdio.h"
d35df41eac69 Initial revision
kono
parents:
diff changeset
5
d35df41eac69 Initial revision
kono
parents:
diff changeset
6 int
d35df41eac69 Initial revision
kono
parents:
diff changeset
7 main(ac,av)
d35df41eac69 Initial revision
kono
parents:
diff changeset
8 int ac;
d35df41eac69 Initial revision
kono
parents:
diff changeset
9 char *av[];
d35df41eac69 Initial revision
kono
parents:
diff changeset
10 {
d35df41eac69 Initial revision
kono
parents:
diff changeset
11 int i;
d35df41eac69 Initial revision
kono
parents:
diff changeset
12 i=main0(ac,av);
748
c2c709727221 i64 continue... basic.s assembled.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 725
diff changeset
13 fprintf(stdout,"#0012:1: %s %d\n",av[0]+2,i);
172
096559f07a70 some check
kono
parents: 0
diff changeset
14 return 0;
0
d35df41eac69 Initial revision
kono
parents:
diff changeset
15 }
d35df41eac69 Initial revision
kono
parents:
diff changeset
16
d35df41eac69 Initial revision
kono
parents:
diff changeset
17 int
d35df41eac69 Initial revision
kono
parents:
diff changeset
18 main0(ac,av)
d35df41eac69 Initial revision
kono
parents:
diff changeset
19 int ac;
d35df41eac69 Initial revision
kono
parents:
diff changeset
20 char *av[];
d35df41eac69 Initial revision
kono
parents:
diff changeset
21 {
d35df41eac69 Initial revision
kono
parents:
diff changeset
22 int i,j,k;
d35df41eac69 Initial revision
kono
parents:
diff changeset
23 i=123;
d35df41eac69 Initial revision
kono
parents:
diff changeset
24 j=456;
d35df41eac69 Initial revision
kono
parents:
diff changeset
25 k=789;
748
c2c709727221 i64 continue... basic.s assembled.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 725
diff changeset
26 fprintf(stdout,"#0025:2: %s\n",av[0]+2);
720
6b7372e17970 *** empty log message ***
kono
parents: 622
diff changeset
27 goto code0(i,j,k,av,__return,__environment);
0
d35df41eac69 Initial revision
kono
parents:
diff changeset
28 }
d35df41eac69 Initial revision
kono
parents:
diff changeset
29
622
682c8ec38d45 _code へ
kono
parents: 180
diff changeset
30 __code code0(i,j,k,av,ret,retenv)
0
d35df41eac69 Initial revision
kono
parents:
diff changeset
31 int i,j,k;
d35df41eac69 Initial revision
kono
parents:
diff changeset
32 char *av[];
622
682c8ec38d45 _code へ
kono
parents: 180
diff changeset
33 __code (*ret)();
0
d35df41eac69 Initial revision
kono
parents:
diff changeset
34 void *retenv;
d35df41eac69 Initial revision
kono
parents:
diff changeset
35 {
d35df41eac69 Initial revision
kono
parents:
diff changeset
36 char *p;
180
f00e3bfa1b45 nkf.c compile (not correct)
kono
parents: 172
diff changeset
37 p = av[0]+2;
748
c2c709727221 i64 continue... basic.s assembled.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 725
diff changeset
38 fprintf(stdout,"#0037:3: i=%d j=%d k=%d av[0]=%s p=%s\n",i,j,k,av[0]+2,p);
0
d35df41eac69 Initial revision
kono
parents:
diff changeset
39 goto code1(i,j,k,av,ret,retenv);
d35df41eac69 Initial revision
kono
parents:
diff changeset
40 }
d35df41eac69 Initial revision
kono
parents:
diff changeset
41
622
682c8ec38d45 _code へ
kono
parents: 180
diff changeset
42 __code code1(i,j,k,av,ret,retenv)
0
d35df41eac69 Initial revision
kono
parents:
diff changeset
43 int i,j,k;
d35df41eac69 Initial revision
kono
parents:
diff changeset
44 char *av[];
622
682c8ec38d45 _code へ
kono
parents: 180
diff changeset
45 __code (*ret)();
0
d35df41eac69 Initial revision
kono
parents:
diff changeset
46 void *retenv;
d35df41eac69 Initial revision
kono
parents:
diff changeset
47 {
748
c2c709727221 i64 continue... basic.s assembled.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 725
diff changeset
48 fprintf(stdout,"#0047:4: %s\n",av[0]+2);
0
d35df41eac69 Initial revision
kono
parents:
diff changeset
49 goto code2(i,j,k,av,ret,retenv);
d35df41eac69 Initial revision
kono
parents:
diff changeset
50 }
d35df41eac69 Initial revision
kono
parents:
diff changeset
51
622
682c8ec38d45 _code へ
kono
parents: 180
diff changeset
52 __code code2(i,j,k,av,ret,retenv)
0
d35df41eac69 Initial revision
kono
parents:
diff changeset
53 int i,j,k;
d35df41eac69 Initial revision
kono
parents:
diff changeset
54 char *av[];
622
682c8ec38d45 _code へ
kono
parents: 180
diff changeset
55 __code (*ret)();
0
d35df41eac69 Initial revision
kono
parents:
diff changeset
56 void *retenv;
d35df41eac69 Initial revision
kono
parents:
diff changeset
57 {
748
c2c709727221 i64 continue... basic.s assembled.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 725
diff changeset
58 fprintf(stdout,"#0057:5: %s\n",av[0]+2);
c2c709727221 i64 continue... basic.s assembled.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 725
diff changeset
59 fprintf(stdout,"#0058:5: i=%d j=%d k=%d\n",i,j,k);
725
3f1f6c0610c1 goto with enviornment syntax changed.
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 720
diff changeset
60 goto (*ret)(1234,retenv);
0
d35df41eac69 Initial revision
kono
parents:
diff changeset
61 }