Mercurial > hg > CbC > old > device
comparison test/ret_check.c @ 622:682c8ec38d45
_code へ
author | kono |
---|---|
date | Thu, 07 Sep 2006 11:50:17 +0900 |
parents | df04bc5fd5fe |
children | 3f1f6c0610c1 |
comparison
equal
deleted
inserted
replaced
621:9397b34d6588 | 622:682c8ec38d45 |
---|---|
1 extern int printf(char *,...); | 1 extern int printf(char *,...); |
2 | 2 |
3 #ifdef __micro_c__ | 3 #ifdef __micro_c__ |
4 | 4 |
5 code(*f_incl_ret)(int); | 5 ____code(*f_incl_ret)(int); |
6 void *f_incl_env; | 6 void *f_incl_env; |
7 | 7 |
8 code | 8 __code |
9 f_incl2(int a0) | 9 f_incl2(int a0) |
10 { // 正しいのはコッチ | 10 { // 正しいのはコッチ |
11 printf("#0010:%d\n",a0); | 11 printf("#0010:%d\n",a0); |
12 goto f_incl_ret(a0),f_incl_env; | 12 goto f_incl_ret(a0),f_incl_env; |
13 } | 13 } |
14 | 14 |
15 code | 15 __code |
16 f_incl2_test(float a0) | 16 f_incl2_test(float a0) |
17 { // ret先のinterface型が異なる | 17 { // ret先のinterface型が異なる |
18 printf("#0017:%g\n",a0); | 18 printf("#0017:%g\n",a0); |
19 goto f_incl_ret(a0),f_incl_env; | 19 goto f_incl_ret(a0),f_incl_env; |
20 } | 20 } |
21 | 21 |
22 code | 22 __code |
23 f_incl1(int a0,code(*ret)(int)) | 23 f_incl1(int a0,__code(*ret)(int)) |
24 { | 24 { |
25 printf("#0024:%d\n",a0); | 25 printf("#0024:%d\n",a0); |
26 goto ret(a0*a0); | 26 goto ret(a0*a0); |
27 } | 27 } |
28 | 28 |