aboutsummaryrefslogtreecommitdiff
path: root/gcc/gimple.h
diff options
context:
space:
mode:
Diffstat (limited to 'gcc/gimple.h')
-rw-r--r--gcc/gimple.h15
1 files changed, 9 insertions, 6 deletions
diff --git a/gcc/gimple.h b/gcc/gimple.h
index cc35b60..be45e4b 100644
--- a/gcc/gimple.h
+++ b/gcc/gimple.h
@@ -2011,6 +2011,13 @@ gimple_call_fn (const_gimple gs)
return gimple_op (gs, 1);
}
+/* Return the function type of the function called by GS. */
+
+static inline tree
+gimple_call_fntype (const_gimple gs)
+{
+ return TREE_TYPE (TREE_TYPE (gimple_call_fn (gs)));
+}
/* Return a pointer to the tree node representing the function called by call
statement GS. */
@@ -2073,13 +2080,9 @@ gimple_call_fndecl (const_gimple gs)
static inline tree
gimple_call_return_type (const_gimple gs)
{
- tree fn = gimple_call_fn (gs);
- tree type = TREE_TYPE (fn);
-
- /* See through the pointer. */
- type = TREE_TYPE (type);
+ tree type = gimple_call_fntype (gs);
- /* The type returned by a FUNCTION_DECL is the type of its
+ /* The type returned by a function is the type of its
function type. */
return TREE_TYPE (type);
}