Mercurial > hg > CbC > CbC_gcc
comparison CbC-examples/rectype/rectype.cbc @ 109:78d3881f2882
add CbC-example/rectype
author | Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> |
---|---|
date | Thu, 14 Jun 2012 20:43:12 +0900 |
parents | |
children |
comparison
equal
deleted
inserted
replaced
108:7ad14f446135 | 109:78d3881f2882 |
---|---|
1 #include <stdio.h> | |
2 #include <stdlib.h> | |
3 __code print(__rectype *p) | |
4 { | |
5 printf("print\n"); | |
6 exit(0); | |
7 } | |
8 __code csA(__rectype *p) | |
9 { | |
10 goto p(csA); | |
11 } | |
12 | |
13 void main1() | |
14 { | |
15 goto csA(print); | |
16 } | |
17 | |
18 int main() | |
19 { | |
20 main1(); | |
21 return 0; | |
22 } |