c-decl.c (get_parm_info): Use INTEGRAL_TYPE_P.

* c-decl.c (get_parm_info): Use INTEGRAL_TYPE_P.
	(store_parm_decls): Likewise.
	* c-typeck.c (convert_arguments): Likewise.

From-SVN: r42882
This commit is contained in:
John David Anglin 2001-06-04 20:26:16 +00:00 committed by John David Anglin
parent 1696785eab
commit b6d6aa84df
3 changed files with 9 additions and 7 deletions

View File

@ -1,3 +1,9 @@
2001-06-04 John David Anglin <dave@hiauly1.hia.nrc.ca>
* c-decl.c (get_parm_info): Use INTEGRAL_TYPE_P.
(store_parm_decls): Likewise.
* c-typeck.c (convert_arguments): Likewise.
2001-06-04 Richard Henderson <rth@redhat.com>
* sibcall.c (optimize_sibling_and_tail_recursive_call): Suppress

View File

@ -5155,8 +5155,7 @@ get_parm_info (void_at_end)
tree type = TREE_TYPE (decl);
DECL_ARG_TYPE (decl) = type;
if (PROMOTE_PROTOTYPES
&& (TREE_CODE (type) == INTEGER_TYPE
|| TREE_CODE (type) == ENUMERAL_TYPE)
&& INTEGRAL_TYPE_P (type)
&& TYPE_PRECISION (type) < TYPE_PRECISION (integer_type_node))
DECL_ARG_TYPE (decl) = integer_type_node;
@ -6443,8 +6442,7 @@ store_parm_decls ()
DECL_ARG_TYPE (parm) = TREE_TYPE (parm);
if (PROMOTE_PROTOTYPES
&& (TREE_CODE (TREE_TYPE (parm)) == INTEGER_TYPE
|| TREE_CODE (TREE_TYPE (parm)) == ENUMERAL_TYPE)
&& INTEGRAL_TYPE_P (TREE_TYPE (parm))
&& TYPE_PRECISION (TREE_TYPE (parm))
< TYPE_PRECISION (integer_type_node))
DECL_ARG_TYPE (parm) = integer_type_node;

View File

@ -1766,9 +1766,7 @@ convert_arguments (typelist, values, name, fundecl)
fundecl, name, parmnum + 1);
if (PROMOTE_PROTOTYPES
&& (TREE_CODE (type) == INTEGER_TYPE
|| TREE_CODE (type) == ENUMERAL_TYPE
|| TREE_CODE (type) == BOOLEAN_TYPE)
&& INTEGRAL_TYPE_P (type)
&& (TYPE_PRECISION (type) < TYPE_PRECISION (integer_type_node)))
parmval = default_conversion (parmval);
}