aboutsummaryrefslogtreecommitdiff
path: root/gcc/ada/utils.c
diff options
context:
space:
mode:
authorKazu Hirata <kazu@cs.umass.edu>2004-02-05 22:07:33 +0000
committerKazu Hirata <kazu@gcc.gnu.org>2004-02-05 22:07:33 +0000
commit136e64db5ea4eda85d7a9916d3ae9f4fa528b1e3 (patch)
tree37419ddcaadd888777ea3df662e86983cd2a9346 /gcc/ada/utils.c
parent839ee4bc570bf56df913d37a4fa3ab9fb6e5956e (diff)
downloadgcc-136e64db5ea4eda85d7a9916d3ae9f4fa528b1e3.zip
gcc-136e64db5ea4eda85d7a9916d3ae9f4fa528b1e3.tar.gz
gcc-136e64db5ea4eda85d7a9916d3ae9f4fa528b1e3.tar.bz2
utils.c (create_param_decl): Replace PROMOTE_PROTOTYPES with targetm.calls.promote_prototypes.
ada/ * ada/utils.c (create_param_decl): Replace PROMOTE_PROTOTYPES with targetm.calls.promote_prototypes. gcc/ * config/cris/cris.h: Replace PROMOTE_PROTOTYPES with TARGET_PROMOTE_PROTOTYPES. cp/ * call.c (type_passed_as): Replace PROMOTE_PROTOTYPES with targetm.calls.promote_prototypes. java/ * Make-lang.in (java/decl.o, java/expr.o, java/parse.o): Depend on target.h. * decl.c: Include target.h. (start_java_method): Replace PROMOTE_PROTOTYPES with targetm.calls.promote_prototypes. * expr.c: Include target.h. (pop_arguments): Replace PROMOTE_PROTOTYPES with targetm.calls.promote_prototypes. * parse.y: Include target.h. (start_complete_expand_method): Replace PROMOTE_PROTOTYPES with targetm.calls.promote_prototypes. From-SVN: r77345
Diffstat (limited to 'gcc/ada/utils.c')
-rw-r--r--gcc/ada/utils.c9
1 files changed, 4 insertions, 5 deletions
diff --git a/gcc/ada/utils.c b/gcc/ada/utils.c
index dbc71a4..9417691 100644
--- a/gcc/ada/utils.c
+++ b/gcc/ada/utils.c
@@ -1540,11 +1540,11 @@ create_param_decl (tree param_name, tree param_type, int readonly)
{
tree param_decl = build_decl (PARM_DECL, param_name, param_type);
- /* Honor the PROMOTE_PROTOTYPES target macro, as not doing so can
+ /* Honor targetm.calls.promote_prototypes(), as not doing so can
lead to various ABI violations. */
-#ifdef PROMOTE_PROTOTYPES
- if ((TREE_CODE (param_type) == INTEGER_TYPE
- || TREE_CODE (param_type) == ENUMERAL_TYPE)
+ if (targetm.calls.promote_prototypes (param_type)
+ && (TREE_CODE (param_type) == INTEGER_TYPE
+ || TREE_CODE (param_type) == ENUMERAL_TYPE)
&& TYPE_PRECISION (param_type) < TYPE_PRECISION (integer_type_node))
{
/* We have to be careful about biased types here. Make a subtype
@@ -1562,7 +1562,6 @@ create_param_decl (tree param_name, tree param_type, int readonly)
else
param_type = integer_type_node;
}
-#endif
DECL_ARG_TYPE (param_decl) = param_type;
DECL_ARG_TYPE_AS_WRITTEN (param_decl) = param_type;