Mercurial > hg > CbC > CbC_gcc
changeset 6:983001f85155
destory goto with environment...
author | Shinji KONO <kono@ie.u-ryukyu.ac.jp> |
---|---|
date | Thu, 20 Aug 2009 13:38:58 +0900 |
parents | a4c410aa4714 |
children | 7ff9aed93de8 |
files | gcc/c-parser.c gcc/cbc-goto.h |
diffstat | 2 files changed, 6 insertions(+), 6 deletions(-) [+] |
line wrap: on
line diff
--- a/gcc/c-parser.c Thu Jul 30 19:22:01 2009 +0900 +++ b/gcc/c-parser.c Thu Aug 20 13:38:58 2009 +0900 @@ -3770,7 +3770,7 @@ //ebp = chainon (ebp, argsp); tmp = build_tree_list (ebp, argsp); - TREE_OPERAND (expr.value, 2) = tmp; + // TREE_OPERAND (expr.value, 2) = tmp; /* @@ -3785,8 +3785,8 @@ } - else - TREE_OPERAND (expr.value, 2) = NULL_TREE; + // else + // TREE_OPERAND (expr.value, 2) = NULL_TREE; CbC_IS_CbC_GOTO (expr.value) = 1; CALL_EXPR_TAILCALL (expr.value) = 1; add_stmt(expr.value); @@ -5752,7 +5752,7 @@ //tree hoge = build_int_cst(NULL_TREE,55); if (!cbc_env) { - tree field,fields,env_struct; + tree field,fields=NULL_TREE,env_struct; /* build type_node of environment structure */ env_struct = start_struct (RECORD_TYPE, NULL_TREE); field = build_decl (FIELD_DECL, get_identifier("sp"), ptr_type_node);
--- a/gcc/cbc-goto.h Thu Jul 30 19:22:01 2009 +0900 +++ b/gcc/cbc-goto.h Thu Aug 20 13:38:58 2009 +0900 @@ -81,8 +81,8 @@ rtx env_rtx; tree env_tree; - env_tree = TREE_OPERAND(exp, 2); - + // env_tree = TREE_OPERAND(exp, 2); + env_tree = NULL_TREE; /* State variables we need to save and restore between iterations. */