Mercurial > hg > CbC > CbC_gcc
comparison gcc/gimple.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 | 959d4c8c8abc |
comparison
equal
deleted
inserted
replaced
4:60db277cbe4d | 5:a4c410aa4714 |
---|---|
31 #include "gimple.h" | 31 #include "gimple.h" |
32 #include "diagnostic.h" | 32 #include "diagnostic.h" |
33 #include "tree-flow.h" | 33 #include "tree-flow.h" |
34 #include "value-prof.h" | 34 #include "value-prof.h" |
35 #include "flags.h" | 35 #include "flags.h" |
36 #ifndef noCbC | |
37 #include "cbc-tree.h" | |
38 #endif | |
36 | 39 |
37 #define DEFGSCODE(SYM, NAME, STRUCT) NAME, | 40 #define DEFGSCODE(SYM, NAME, STRUCT) NAME, |
38 const char *const gimple_code_name[] = { | 41 const char *const gimple_code_name[] = { |
39 #include "gimple.def" | 42 #include "gimple.def" |
40 }; | 43 }; |
358 gimple_call_set_tail (call, CALL_EXPR_TAILCALL (t)); | 361 gimple_call_set_tail (call, CALL_EXPR_TAILCALL (t)); |
359 gimple_call_set_cannot_inline (call, CALL_CANNOT_INLINE_P (t)); | 362 gimple_call_set_cannot_inline (call, CALL_CANNOT_INLINE_P (t)); |
360 gimple_call_set_return_slot_opt (call, CALL_EXPR_RETURN_SLOT_OPT (t)); | 363 gimple_call_set_return_slot_opt (call, CALL_EXPR_RETURN_SLOT_OPT (t)); |
361 gimple_call_set_from_thunk (call, CALL_FROM_THUNK_P (t)); | 364 gimple_call_set_from_thunk (call, CALL_FROM_THUNK_P (t)); |
362 gimple_call_set_va_arg_pack (call, CALL_EXPR_VA_ARG_PACK (t)); | 365 gimple_call_set_va_arg_pack (call, CALL_EXPR_VA_ARG_PACK (t)); |
366 #ifndef noCbC | |
367 gimple_call_set_cbc_goto (call, CALL_EXPR_CBC_GOTO (t)); | |
368 #endif | |
363 | 369 |
364 return call; | 370 return call; |
365 } | 371 } |
366 | 372 |
367 | 373 |
3186 gimple_call_set_tail (new_stmt, gimple_call_tail_p (stmt)); | 3192 gimple_call_set_tail (new_stmt, gimple_call_tail_p (stmt)); |
3187 gimple_call_set_cannot_inline (new_stmt, gimple_call_cannot_inline_p (stmt)); | 3193 gimple_call_set_cannot_inline (new_stmt, gimple_call_cannot_inline_p (stmt)); |
3188 gimple_call_set_return_slot_opt (new_stmt, gimple_call_return_slot_opt_p (stmt)); | 3194 gimple_call_set_return_slot_opt (new_stmt, gimple_call_return_slot_opt_p (stmt)); |
3189 gimple_call_set_from_thunk (new_stmt, gimple_call_from_thunk_p (stmt)); | 3195 gimple_call_set_from_thunk (new_stmt, gimple_call_from_thunk_p (stmt)); |
3190 gimple_call_set_va_arg_pack (new_stmt, gimple_call_va_arg_pack_p (stmt)); | 3196 gimple_call_set_va_arg_pack (new_stmt, gimple_call_va_arg_pack_p (stmt)); |
3197 #ifndef noCbC | |
3198 gimple_call_set_cbc_goto (new_stmt, gimple_call_cbc_goto_p (stmt)); | |
3199 #endif | |
3191 return new_stmt; | 3200 return new_stmt; |
3192 } | 3201 } |
3193 | 3202 |
3194 #include "gt-gimple.h" | 3203 #include "gt-gimple.h" |