Mercurial > hg > CbC > CbC_gcc

comparison gcc/c-parser.c @ 21:959d4c8c8abc

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
add conv.c conv1.c
author kent <kent@cr.ie.u-ryukyu.ac.jp>
date Tue, 29 Sep 2009 20:15:16 +0900
parents 9de9dad105d4
children 0eb6cac880f0
comparison
equal deleted inserted replaced
20:9de9dad105d4 21:959d4c8c8abc
3793 { 3793 {
3794 TREE_TYPE(expr.value) = void_type_node; 3794 TREE_TYPE(expr.value) = void_type_node;
3795 tree env = NULL_TREE; 3795 tree env = NULL_TREE;
3796 // if (c_parser_next_token_is (parser, CPP_COMMA)) 3796 // if (c_parser_next_token_is (parser, CPP_COMMA))
3797 // env = c_parser_cbc_make_env(parser); 3797 // env = c_parser_cbc_make_env(parser);
3798 if (CbC_IS_CODE_SEGMENT(TREE_TYPE(current_function_decl))) 3798 //if (CbC_IS_CODE_SEGMENT(TREE_TYPE(current_function_decl)))
3799 { 3799 {
3800 CbC_IS_CbC_GOTO (expr.value) = 1; 3800 CbC_IS_CbC_GOTO (expr.value) = 1;
3801 CALL_EXPR_TAILCALL (expr.value) = 1; 3801 CALL_EXPR_TAILCALL (expr.value) = 1;
3802 } 3802 }
3803 add_stmt(expr.value); 3803 add_stmt(expr.value);
3804 CbC_HAVE_CbC_GOTO (current_function_decl) = 1; 3804 //CbC_HAVE_CbC_GOTO (current_function_decl) = 1;
3805 // should be match with function type? 3805 // should be match with function type?
3806 stmt = c_finish_return (0); 3806 stmt = c_finish_return (0);
3807 } 3807 }
3808 else 3808 else
3809 c_parser_error (parser, "expected code segment jump or %<*%>"); 3809 c_parser_error (parser, "expected code segment jump or %<*%>");