annotate test/tmp2.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 fprintf(stderr,"2: %s\n",av[0]);
d35df41eac69 Initial revision
kono
parents:
diff changeset
20 goto code0(av,return,environment);
d35df41eac69 Initial revision
kono
parents:
diff changeset
21 }
d35df41eac69 Initial revision
kono
parents:
diff changeset
22
d35df41eac69 Initial revision
kono
parents:
diff changeset
23 code code0(av,ret,retenv)
d35df41eac69 Initial revision
kono
parents:
diff changeset
24 char *av[];
d35df41eac69 Initial revision
kono
parents:
diff changeset
25 code (*ret)();
d35df41eac69 Initial revision
kono
parents:
diff changeset
26 void *retenv;
d35df41eac69 Initial revision
kono
parents:
diff changeset
27 {
d35df41eac69 Initial revision
kono
parents:
diff changeset
28 char *p;
d35df41eac69 Initial revision
kono
parents:
diff changeset
29 p = av[0];
d35df41eac69 Initial revision
kono
parents:
diff changeset
30 fprintf(stderr,"3: %s\n",p);
d35df41eac69 Initial revision
kono
parents:
diff changeset
31 goto code1(av,ret,retenv);
d35df41eac69 Initial revision
kono
parents:
diff changeset
32 }
d35df41eac69 Initial revision
kono
parents:
diff changeset
33
d35df41eac69 Initial revision
kono
parents:
diff changeset
34 code code1(av,ret,retenv)
d35df41eac69 Initial revision
kono
parents:
diff changeset
35 char *av[];
d35df41eac69 Initial revision
kono
parents:
diff changeset
36 code (*ret)();
d35df41eac69 Initial revision
kono
parents:
diff changeset
37 void *retenv;
d35df41eac69 Initial revision
kono
parents:
diff changeset
38 {
d35df41eac69 Initial revision
kono
parents:
diff changeset
39 fprintf(stderr,"4: %s\n",av[0]);
d35df41eac69 Initial revision
kono
parents:
diff changeset
40 goto (*ret)(1234),retenv;
d35df41eac69 Initial revision
kono
parents:
diff changeset
41 }