|
78
|
1 #define __environment _CbC_environment
|
|
|
2 #define __return _CbC_return
|
|
|
3
|
|
|
4 #include "stdio.h"
|
|
|
5
|
|
126
|
6 int main0(int ac, char *av[]);
|
|
|
7 __code code0( int i,int j,int k, char *av[], __code (*ret)(), void *retenv);
|
|
|
8 __code code1( int i,int j,int k, char *av[], __code (*ret)(), void *retenv);
|
|
|
9 __code code2( int i,int j,int k, char *av[], __code (*ret)(), void *retenv);
|
|
|
10
|
|
78
|
11 int
|
|
|
12 main(ac,av)
|
|
|
13 int ac;
|
|
|
14 char *av[];
|
|
|
15 {
|
|
|
16 int i;
|
|
|
17 i=main0(ac,av);
|
|
|
18 fprintf(stdout,"#0012:1: %s %d\n",av[0]+2,i);
|
|
|
19 return 0;
|
|
|
20 }
|
|
|
21
|
|
|
22 int
|
|
|
23 main0(ac,av)
|
|
|
24 int ac;
|
|
|
25 char *av[];
|
|
|
26 {
|
|
|
27 int i,j,k;
|
|
|
28 i=123;
|
|
|
29 j=456;
|
|
|
30 k=789;
|
|
|
31 fprintf(stdout,"#0025:2: %s\n",av[0]+2);
|
|
|
32 goto code0(i,j,k,av,__return,__environment);
|
|
|
33 }
|
|
|
34
|
|
|
35 __code code0(i,j,k,av,ret,retenv)
|
|
|
36 int i,j,k;
|
|
|
37 char *av[];
|
|
|
38 __code (*ret)();
|
|
|
39 void *retenv;
|
|
|
40 {
|
|
|
41 char *p;
|
|
|
42 p = av[0]+2;
|
|
|
43 fprintf(stdout,"#0037:3: i=%d j=%d k=%d av[0]=%s p=%s\n",i,j,k,av[0]+2,p);
|
|
|
44 goto code1(i,j,k,av,ret,retenv);
|
|
|
45 }
|
|
|
46
|
|
|
47 __code code1(i,j,k,av,ret,retenv)
|
|
|
48 int i,j,k;
|
|
|
49 char *av[];
|
|
|
50 __code (*ret)();
|
|
|
51 void *retenv;
|
|
|
52 {
|
|
|
53 fprintf(stdout,"#0047:4: %s\n",av[0]+2);
|
|
|
54 goto code2(i,j,k,av,ret,retenv);
|
|
|
55 }
|
|
|
56
|
|
|
57 __code code2(i,j,k,av,ret,retenv)
|
|
|
58 int i,j,k;
|
|
|
59 char *av[];
|
|
|
60 __code (*ret)();
|
|
|
61 void *retenv;
|
|
|
62 {
|
|
|
63 fprintf(stdout,"#0057:5: %s\n",av[0]+2);
|
|
|
64 fprintf(stdout,"#0058:5: i=%d j=%d k=%d\n",i,j,k);
|
|
|
65 goto (*ret)(1234,retenv);
|
|
|
66 }
|
