OpenE2K/gcc
2
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

ada-tree.h (TYPE_LEFT_JUSTIFIED_MODULAR_P): Use RECORD_OR_UNION_CHECK.

Browse Source 
* ada-tree.h (TYPE_LEFT_JUSTIFIED_MODULAR_P): Use
	RECORD_OR_UNION_CHECK.
	(TYPE_CONTAINS_TEMPLATE_P): Likewise.

From-SVN: r84127
This commit is contained in:
Andreas Schwab 2004-07-05 18:36:47 +00:00 committed by Andreas Schwab
parent c31b8e1b17
commit cb42deba63
2 changed files with 8 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
gcc/ada/ChangeLog
View File

@ -1,3 +1,9 @@
2004-07-05 Andreas Schwab <schwab@suse.de>
* ada-tree.h (TYPE_LEFT_JUSTIFIED_MODULAR_P): Use
RECORD_OR_UNION_CHECK.
(TYPE_CONTAINS_TEMPLATE_P): Likewise.
2004-07-04 Kelley Cook <kcook@gcc.gnu.org>
* Make-lang.in (doc/gnat_ugn_unw.texi): Eliminate explicit

4
gcc/ada/ada-tree.h
View File

@ -71,7 +71,7 @@ struct lang_type GTY(()) {union lang_tree_node t; };
/* For RECORD_TYPE, UNION_TYPE, and QUAL_UNION_TYPE, nonzero if this denotes
a left-justified modular type (will only be true for RECORD_TYPE). */
#define TYPE_LEFT_JUSTIFIED_MODULAR_P(NODE) \
TYPE_LANG_FLAG_1 (REC_OR_UNION_CHECK (NODE))
TYPE_LANG_FLAG_1 (RECORD_OR_UNION_CHECK (NODE))
/* Nonzero in an arithmetic subtype if this is a subtype not known to the
front-end. */
@ -84,7 +84,7 @@ struct lang_type GTY(()) {union lang_tree_node t; };
type for an object whose type includes its template in addition to
its value (only true for RECORD_TYPE). */
#define TYPE_CONTAINS_TEMPLATE_P(NODE) \
TYPE_LANG_FLAG_3 (REC_OR_UNION_CHECK (NODE))
TYPE_LANG_FLAG_3 (RECORD_OR_UNION_CHECK (NODE))
/* For INTEGER_TYPE, nonzero if this really represents a VAX
floating-point type. */