diff options
Diffstat (limited to 'gcc/gimple.h')
| -rw-r--r-- | gcc/gimple.h | 30 |
1 files changed, 22 insertions, 8 deletions
diff --git a/gcc/gimple.h b/gcc/gimple.h index be45e4b..572cabc 100644 --- a/gcc/gimple.h +++ b/gcc/gimple.h @@ -405,7 +405,10 @@ struct GTY(()) gimple_statement_call struct pt_solution call_used; struct pt_solution call_clobbered; - /* [ WORD 13 ] + /* [ WORD 13 ] */ + tree fntype; + + /* [ WORD 14 ] Operand vector. NOTE! This must always be the last field of this structure. In particular, this means that this structure cannot be embedded inside another one. */ @@ -2001,22 +2004,33 @@ gimple_call_set_lhs (gimple gs, tree lhs) } -/* Return the tree node representing the function called by call - statement GS. */ +/* Return the function type of the function called by GS. */ static inline tree -gimple_call_fn (const_gimple gs) +gimple_call_fntype (const_gimple gs) { GIMPLE_CHECK (gs, GIMPLE_CALL); - return gimple_op (gs, 1); + return gs->gimple_call.fntype; } -/* Return the function type of the function called by GS. */ +/* Set the type of the function called by GS to FNTYPE. */ + +static inline void +gimple_call_set_fntype (gimple gs, tree fntype) +{ + GIMPLE_CHECK (gs, GIMPLE_CALL); + gs->gimple_call.fntype = fntype; +} + + +/* Return the tree node representing the function called by call + statement GS. */ static inline tree -gimple_call_fntype (const_gimple gs) +gimple_call_fn (const_gimple gs) { - return TREE_TYPE (TREE_TYPE (gimple_call_fn (gs))); + GIMPLE_CHECK (gs, GIMPLE_CALL); + return gimple_op (gs, 1); } /* Return a pointer to the tree node representing the function called by call |