Mercurial > hg > CbC > CbC_gcc
changeset 84:a5786e986ad2
modify gcc/c-parser.c
author | Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp> |
---|---|
date | Sun, 13 Nov 2011 16:21:32 +0900 |
parents | 6fb1a677d0b5 |
children | 32380d8cb035 |
files | CbC-examples/arg.c gcc/c-parser.c |
diffstat | 2 files changed, 5 insertions(+), 5 deletions(-) [+] |
line wrap: on
line diff
--- a/CbC-examples/arg.c Fri Nov 11 04:29:33 2011 +0900 +++ b/CbC-examples/arg.c Sun Nov 13 16:21:32 2011 +0900 @@ -13,13 +13,13 @@ void *exit_env; __code (*exit___code)(); -__code carg1(int arg0,int arg1,int arg2,int arg3,int arg4,__code(*exit1)(),void *env) +__code carg1(int arg0,int arg1,int arg2,int arg3,int arg4,__code(*exit1)(int, void*),void *env) { printf("#0017:arg1: %d %d %d %d %d : %x %x\n",arg0,arg1,arg2,arg3,arg4,exit1==exit___code,env==exit_env); goto carg2(arg1,arg2,arg3,arg4,arg0,exit1,env); } -__code carg2(int arg0,int arg1,int arg2,int arg3,int arg4,__code(*exit1)(),void *env) +__code carg2(int arg0,int arg1,int arg2,int arg3,int arg4,__code(*exit1)(int, void*),void *env) { struct arg args0; printf("#0024:arg1: %d %d %d %d %d : %x %x\n",arg0,arg1,arg2,arg3,arg4,exit1==exit___code,env==exit_env ); @@ -31,7 +31,7 @@ goto cargs(args0,exit1,env); } -__code cargs(struct arg args0,__code exit1(),void *env) +__code cargs(struct arg args0,__code exit1(int, void*),void *env) { printf("#0035:args: %d %d %d %d %d : %x %x\n", args0.a0,args0.a1,args0.a2,args0.a3,args0.a4,
--- a/gcc/c-parser.c Fri Nov 11 04:29:33 2011 +0900 +++ b/gcc/c-parser.c Sun Nov 13 16:21:32 2011 +0900 @@ -6721,7 +6721,7 @@ _cbc_exit0: return retval; } - __return_func; + _cbc_internal_return; }); */ tree value, stmt, label, tlab, decl; @@ -6740,7 +6740,7 @@ /* declare retval. (int retval;) */ tree decl_cond = build_decl (location, VAR_DECL, get_identifier ("retval"), - TREE_TYPE (TREE_TYPE (current_function_decl))); + TREE_TYPE (TREE_TYPE (current_function_decl))); TREE_STATIC (decl_cond) = 1; DECL_ARTIFICIAL (decl_cond) = 1; pushdecl (decl_cond);