Mercurial > hg > CbC > CbC_gcc
comparison CbC-examples/tmp2.c @ 126:5d30d517ebed
fix example
author | mir3636 |
---|---|
date | Sun, 08 Apr 2018 20:55:21 +0900 |
parents | 365b84b6fe04 |
children | 4c56639505ff |
comparison
equal
deleted
inserted
replaced
125:2c7bdd5a49f6 | 126:5d30d517ebed |
---|---|
1 #define __environment _CbC_environment | 1 #define __environment _CbC_environment |
2 #define __return _CbC_return | 2 #define __return _CbC_return |
3 | 3 |
4 #include "stdio.h" | 4 #include "stdio.h" |
5 | |
6 int main0(int ac,char *av[]); | |
7 __code code0(char *av[],__code (*ret)(int),void *retenv); | |
8 __code code1(char *av[],__code (*ret)(int),void *retenv); | |
5 | 9 |
6 int | 10 int |
7 main(ac,av) | 11 main(ac,av) |
8 int ac; | 12 int ac; |
9 char *av[]; | 13 char *av[]; |
18 main0(ac,av) | 22 main0(ac,av) |
19 int ac; | 23 int ac; |
20 char *av[]; | 24 char *av[]; |
21 { | 25 { |
22 fprintf(stdout,"#0021:2: %s\n",av[0]); | 26 fprintf(stdout,"#0021:2: %s\n",av[0]); |
23 goto code0(av,__return,__environment); | 27 goto code0(av,__CbC_return,__CbC_environment); |
24 } | 28 } |
25 | 29 |
26 __code code0(av,ret,retenv) | 30 __code code0(av,ret,retenv) |
27 char *av[]; | 31 char *av[]; |
28 __code (*ret)(); | 32 __code (*ret)(); |