Mercurial > hg > CbC > CbC_gcc
diff CbC-examples/conv1/conv1.c @ 106:85047c4f1ca4
add CbC-examples/rectypeTest
author | Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> |
---|---|
date | Wed, 13 Jun 2012 17:18:58 +0900 |
parents | 79124facde7c |
children |
line wrap: on
line diff
--- a/CbC-examples/conv1/conv1.c Fri May 25 10:34:23 2012 +0900 +++ b/CbC-examples/conv1/conv1.c Wed Jun 13 17:18:58 2012 +0900 @@ -11,7 +11,6 @@ #include "conv1.h" /* classical function call case (0) */ - f0(int i) { int k,j; k = 3+i; @@ -43,7 +42,7 @@ } struct f_g0_interface { // Specialized Return Continuation - __code (*ret)(); + __code (*ret)(int,stack); int i_,k_,j_; }; @@ -191,7 +190,7 @@ if (sw==0) { for(loop=0;loop<LOOP_COUNT;loop++) { - j = f0(233); + j = f0(loop); } printf("#0193:%d\n",j); #if !CC_ONLY @@ -202,7 +201,7 @@ cont->ret = main_return; cont->main_ret = _CbC_return; cont->env = _CbC_environment; - goto f(233,sp); + goto f(loop,sp); } else if (sw==2) { loop = LOOP_COUNT; sp -= sizeof(*cont); @@ -210,7 +209,7 @@ cont->ret = main_return2; cont->main_ret = _CbC_return; cont->env = _CbC_environment; - goto f2(233,sp); + goto f2(loop,sp); } else if (sw==3) { loop = LOOP_COUNT; sp -= sizeof(*cont); @@ -218,7 +217,7 @@ cont->ret = main_return2_1; cont->main_ret = _CbC_return; cont->env = _CbC_environment; - goto f2_1(233,sp); + goto f2_1(loop,sp); #endif } return 0;