Mercurial > hg > CbC > CbC_gcc
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 |