diff options
| author | John David Anglin <dave@hiauly1.hia.nrc.ca> | 2001-06-04 20:26:16 +0000 |
|---|---|---|
| committer | John David Anglin <danglin@gcc.gnu.org> | 2001-06-04 20:26:16 +0000 |
| commit | b6d6aa84dfb2b247aa91f50e5e1b11107b870268 (patch) | |
| tree | 2721da5b63daedf57ba9c79dbc171e472c732d09 /gcc | |
| parent | 1696785eabbaabfbc6615177fd150589a894e743 (diff) | |
| download | gcc-b6d6aa84dfb2b247aa91f50e5e1b11107b870268.zip gcc-b6d6aa84dfb2b247aa91f50e5e1b11107b870268.tar.gz gcc-b6d6aa84dfb2b247aa91f50e5e1b11107b870268.tar.bz2 | |
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
Diffstat (limited to 'gcc')
| -rw-r--r-- | gcc/ChangeLog | 6 | ||||
| -rw-r--r-- | gcc/c-decl.c | 6 | ||||
| -rw-r--r-- | gcc/c-typeck.c | 4 |
3 files changed, 9 insertions, 7 deletions
diff --git a/gcc/ChangeLog b/gcc/ChangeLog index 0fb8a8c..7701fa0 100644 --- a/gcc/ChangeLog +++ b/gcc/ChangeLog @@ -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 diff --git a/gcc/c-decl.c b/gcc/c-decl.c index 7c02d05..88a41f9 100644 --- a/gcc/c-decl.c +++ b/gcc/c-decl.c @@ -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; diff --git a/gcc/c-typeck.c b/gcc/c-typeck.c index 71dae28..5705faa 100644 --- a/gcc/c-typeck.c +++ b/gcc/c-typeck.c @@ -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); } |