comparison gcc/cfgexpand.c @ 5:a4c410aa4714

modifing gimple.[ch], cfgexpand.c to make gimple to support cbc goto flags.
author kent <kent@cr.ie.u-ryukyu.ac.jp>
date Thu, 30 Jul 2009 19:22:01 +0900
parents a06113de4d67
children 9de9dad105d4
comparison
equal deleted inserted replaced
4:60db277cbe4d 5:a4c410aa4714
40 #include "debug.h" 40 #include "debug.h"
41 #include "params.h" 41 #include "params.h"
42 #include "tree-inline.h" 42 #include "tree-inline.h"
43 #include "value-prof.h" 43 #include "value-prof.h"
44 #include "target.h" 44 #include "target.h"
45 #ifndef noCbC
46 #include "cbc-tree.h"
47 #endif
45 48
46 49
47 /* Return an expression tree corresponding to the RHS of GIMPLE 50 /* Return an expression tree corresponding to the RHS of GIMPLE
48 statement STMT. */ 51 statement STMT. */
49 52
233 CALL_EXPR_TAILCALL (t) = gimple_call_tail_p (stmt); 236 CALL_EXPR_TAILCALL (t) = gimple_call_tail_p (stmt);
234 CALL_EXPR_RETURN_SLOT_OPT (t) = gimple_call_return_slot_opt_p (stmt); 237 CALL_EXPR_RETURN_SLOT_OPT (t) = gimple_call_return_slot_opt_p (stmt);
235 CALL_FROM_THUNK_P (t) = gimple_call_from_thunk_p (stmt); 238 CALL_FROM_THUNK_P (t) = gimple_call_from_thunk_p (stmt);
236 CALL_CANNOT_INLINE_P (t) = gimple_call_cannot_inline_p (stmt); 239 CALL_CANNOT_INLINE_P (t) = gimple_call_cannot_inline_p (stmt);
237 CALL_EXPR_VA_ARG_PACK (t) = gimple_call_va_arg_pack_p (stmt); 240 CALL_EXPR_VA_ARG_PACK (t) = gimple_call_va_arg_pack_p (stmt);
241 #ifndef noCbC
242 CALL_EXPR_CBC_GOTO (t) = gimple_call_cbc_goto_p (stmt);
243 #endif
238 244
239 /* If the call has a LHS then create a MODIFY_EXPR to hold it. */ 245 /* If the call has a LHS then create a MODIFY_EXPR to hold it. */
240 { 246 {
241 tree lhs = gimple_call_lhs (stmt); 247 tree lhs = gimple_call_lhs (stmt);
242 248