Mercurial > hg > CbC > CbC_examples
changeset 15:f889a158ce07
update conv1
author | Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp> |
---|---|
date | Sat, 18 Apr 2015 01:52:44 +0900 |
parents | 7d168c1829c9 |
children | 23ad5811c88f |
files | conv1/conv1.c |
diffstat | 1 files changed, 9 insertions(+), 9 deletions(-) [+] |
line wrap: on
line diff
--- a/conv1/conv1.c Fri Apr 17 16:09:28 2015 +0900 +++ b/conv1/conv1.c Sat Apr 18 01:52:44 2015 +0900 @@ -8,9 +8,9 @@ #define CC_ONLY 1 #endif -#ifdef CLANG // for clang/LLVM -#define _CbC_return __return -#define _CbC_environment __environment +#ifdef GCC // for GCC +#define __return _CbC_return +#define __environment _CbC_environment #endif typedef char *stack; @@ -203,24 +203,24 @@ sp -= sizeof(*cont); cont = (struct main_continuation *)sp; cont->ret = main_return; - cont->main_ret = _CbC_return; - cont->env = _CbC_environment; + cont->main_ret = __return; + cont->env = __environment; goto f(loop,sp); } else if (sw==2) { loop = LOOP_COUNT; sp -= sizeof(*cont); cont = (struct main_continuation *)sp; cont->ret = main_return2; - cont->main_ret = _CbC_return; - cont->env = _CbC_environment; + cont->main_ret = __return; + cont->env = __environment; goto f2(loop,sp); } else if (sw==3) { loop = LOOP_COUNT; sp -= sizeof(*cont); cont = (struct main_continuation *)sp; cont->ret = main_return2_1; - cont->main_ret = _CbC_return; - cont->env = _CbC_environment; + cont->main_ret = __return; + cont->env = __environment; goto f2_1(loop,sp); #endif }