diff options
| author | Eric Botcazou <ebotcazou@adacore.com> | 2011-08-30 16:46:12 +0000 |
|---|---|---|
| committer | Eric Botcazou <ebotcazou@gcc.gnu.org> | 2011-08-30 16:46:12 +0000 |
| commit | 4f1a975cc19d5cd5ce2fa7142044a77eeffb5572 (patch) | |
| tree | d683a5ca69d1dfd075af708ef9c2fa857e138a37 /gcc/ada/gcc-interface/ada-tree.h | |
| parent | f2991b48202740f19566099850048e8718da03b1 (diff) | |
| download | gcc-4f1a975cc19d5cd5ce2fa7142044a77eeffb5572.zip gcc-4f1a975cc19d5cd5ce2fa7142044a77eeffb5572.tar.gz gcc-4f1a975cc19d5cd5ce2fa7142044a77eeffb5572.tar.bz2 | |
ada-tree.h (TYPE_EXTRA_SUBTYPE_P): Add internal check.
* gcc-interface/ada-tree.h (TYPE_EXTRA_SUBTYPE_P): Add internal check.
* gcc-interface/utils2.c (build_binary_op): Tighten condition.
(build_unary_op): Likewise.
From-SVN: r178335
Diffstat (limited to 'gcc/ada/gcc-interface/ada-tree.h')
| -rw-r--r-- | gcc/ada/gcc-interface/ada-tree.h | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/ada/gcc-interface/ada-tree.h b/gcc/ada/gcc-interface/ada-tree.h index 588c852..2d0e6e4 100644 --- a/gcc/ada/gcc-interface/ada-tree.h +++ b/gcc/ada/gcc-interface/ada-tree.h @@ -106,7 +106,7 @@ do { \ /* Nonzero in an arithmetic subtype if this is a subtype not known to the front-end. */ -#define TYPE_EXTRA_SUBTYPE_P(NODE) TYPE_LANG_FLAG_2 (NODE) +#define TYPE_EXTRA_SUBTYPE_P(NODE) TYPE_LANG_FLAG_2 (INTEGER_TYPE_CHECK (NODE)) /* For RECORD_TYPE, UNION_TYPE, and QUAL_UNION_TYPE, nonzero if this is the type for an object whose type includes its template in addition to |