annotate test/tmp4.c @ 6:bf602558130d

continuation
author kono
date Thu, 13 Jan 2000 13:41:09 +0900
parents d35df41eac69
children 096559f07a70
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
0
d35df41eac69 Initial revision
kono
parents:
diff changeset
1 #include "stdio.h"
d35df41eac69 Initial revision
kono
parents:
diff changeset
2
d35df41eac69 Initial revision
kono
parents:
diff changeset
3 int
d35df41eac69 Initial revision
kono
parents:
diff changeset
4 main(ac,av)
d35df41eac69 Initial revision
kono
parents:
diff changeset
5 int ac;
d35df41eac69 Initial revision
kono
parents:
diff changeset
6 char *av[];
d35df41eac69 Initial revision
kono
parents:
diff changeset
7 {
d35df41eac69 Initial revision
kono
parents:
diff changeset
8 int i;
d35df41eac69 Initial revision
kono
parents:
diff changeset
9 i=main0(ac,av);
d35df41eac69 Initial revision
kono
parents:
diff changeset
10 fprintf(stderr,"1: %s %d\n",av[0],i);
d35df41eac69 Initial revision
kono
parents:
diff changeset
11 return i;
d35df41eac69 Initial revision
kono
parents:
diff changeset
12 }
d35df41eac69 Initial revision
kono
parents:
diff changeset
13
d35df41eac69 Initial revision
kono
parents:
diff changeset
14 int
d35df41eac69 Initial revision
kono
parents:
diff changeset
15 main0(ac,av)
d35df41eac69 Initial revision
kono
parents:
diff changeset
16 int ac;
d35df41eac69 Initial revision
kono
parents:
diff changeset
17 char *av[];
d35df41eac69 Initial revision
kono
parents:
diff changeset
18 {
d35df41eac69 Initial revision
kono
parents:
diff changeset
19 int i,j,k;
d35df41eac69 Initial revision
kono
parents:
diff changeset
20 i=123;
d35df41eac69 Initial revision
kono
parents:
diff changeset
21 j=456;
d35df41eac69 Initial revision
kono
parents:
diff changeset
22 k=789;
d35df41eac69 Initial revision
kono
parents:
diff changeset
23 fprintf(stderr,"2: av=%x av[0]=%x %s\n",av,av[0],av[0]);
d35df41eac69 Initial revision
kono
parents:
diff changeset
24 goto code0(i,j,k,av,return,environment);
d35df41eac69 Initial revision
kono
parents:
diff changeset
25 }
d35df41eac69 Initial revision
kono
parents:
diff changeset
26
d35df41eac69 Initial revision
kono
parents:
diff changeset
27 code code0(i,j,k,av,ret,retenv)
d35df41eac69 Initial revision
kono
parents:
diff changeset
28 int i,j,k;
d35df41eac69 Initial revision
kono
parents:
diff changeset
29 char *av[];
d35df41eac69 Initial revision
kono
parents:
diff changeset
30 code (*ret)();
d35df41eac69 Initial revision
kono
parents:
diff changeset
31 void *retenv;
d35df41eac69 Initial revision
kono
parents:
diff changeset
32 {
d35df41eac69 Initial revision
kono
parents:
diff changeset
33 char *p;
d35df41eac69 Initial revision
kono
parents:
diff changeset
34 p = av[0];
d35df41eac69 Initial revision
kono
parents:
diff changeset
35 fprintf(stderr,"3: i=%d j=%d k=%d av=%x p=%s\n",i,j,k,av,p);
d35df41eac69 Initial revision
kono
parents:
diff changeset
36 goto code1(i,j,k,av,ret,retenv);
d35df41eac69 Initial revision
kono
parents:
diff changeset
37 }
d35df41eac69 Initial revision
kono
parents:
diff changeset
38
d35df41eac69 Initial revision
kono
parents:
diff changeset
39 code code1(i,j,k,av,ret,retenv)
d35df41eac69 Initial revision
kono
parents:
diff changeset
40 int i,j,k;
d35df41eac69 Initial revision
kono
parents:
diff changeset
41 char *av[];
d35df41eac69 Initial revision
kono
parents:
diff changeset
42 code (*ret)();
d35df41eac69 Initial revision
kono
parents:
diff changeset
43 void *retenv;
d35df41eac69 Initial revision
kono
parents:
diff changeset
44 {
d35df41eac69 Initial revision
kono
parents:
diff changeset
45 fprintf(stderr,"4: %s\n",av[0]);
d35df41eac69 Initial revision
kono
parents:
diff changeset
46 goto code2(i,j,k,av,ret,retenv);
d35df41eac69 Initial revision
kono
parents:
diff changeset
47 }
d35df41eac69 Initial revision
kono
parents:
diff changeset
48
d35df41eac69 Initial revision
kono
parents:
diff changeset
49 code code2(i,j,k,av,ret,retenv)
d35df41eac69 Initial revision
kono
parents:
diff changeset
50 int i,j,k;
d35df41eac69 Initial revision
kono
parents:
diff changeset
51 char *av[];
d35df41eac69 Initial revision
kono
parents:
diff changeset
52 code (*ret)();
d35df41eac69 Initial revision
kono
parents:
diff changeset
53 void *retenv;
d35df41eac69 Initial revision
kono
parents:
diff changeset
54 {
d35df41eac69 Initial revision
kono
parents:
diff changeset
55 fprintf(stderr,"5: %s\n",av[0]);
d35df41eac69 Initial revision
kono
parents:
diff changeset
56 fprintf(stderr,"5: i=%d j=%d k=%d av=%x\n",i,j,k,av);
d35df41eac69 Initial revision
kono
parents:
diff changeset
57 goto (*ret)(1234),retenv;
d35df41eac69 Initial revision
kono
parents:
diff changeset
58 }