diff options
| author | nathan <nathan@138bc75d-0d04-0410-961f-82ee72b054a4> | 2004-08-25 11:24:11 +0000 |
|---|---|---|
| committer | nathan <nathan@138bc75d-0d04-0410-961f-82ee72b054a4> | 2004-08-25 11:24:11 +0000 |
| commit | 409786fc0883880d05653be1e5bcb47dde90891b (patch) | |
| tree | fc2e948218b58848dc4dad33e7e352522f287806 | |
| parent | 7016c6128fa54ae4f68077da816fe0744cb8a852 (diff) | |
| download | ppe42-gcc-409786fc0883880d05653be1e5bcb47dde90891b.tar.gz ppe42-gcc-409786fc0883880d05653be1e5bcb47dde90891b.zip | |
* ada-tree.h (TYPE_RM_SIZE_INT): Use TYPE_LANG_SLOT_1.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@86545 138bc75d-0d04-0410-961f-82ee72b054a4
| -rw-r--r-- | gcc/ada/ChangeLog | 5 | ||||
| -rw-r--r-- | gcc/ada/ada-tree.h | 2 |
2 files changed, 6 insertions, 1 deletions
diff --git a/gcc/ada/ChangeLog b/gcc/ada/ChangeLog index e49c9ab4e46..0f900086a87 100644 --- a/gcc/ada/ChangeLog +++ b/gcc/ada/ChangeLog @@ -1,4 +1,9 @@ 2004-08-25 Nathan Sidwell <nathan@codesourcery.com> + Richard Kenner <kenner@vlsi1.ultra.nyu.edu> + + * ada-tree.h (TYPE_RM_SIZE_INT): Use TYPE_LANG_SLOT_1. + +2004-08-25 Nathan Sidwell <nathan@codesourcery.com> * cuintp.c (UI_To_gnu): Adjust build_int_cst calls. * trans.c (Exception_Handler_to_gnu_sjlj, gnat_to_gnu): Likewise. diff --git a/gcc/ada/ada-tree.h b/gcc/ada/ada-tree.h index b0126846e8c..45e597e6713 100644 --- a/gcc/ada/ada-tree.h +++ b/gcc/ada/ada-tree.h @@ -165,7 +165,7 @@ struct lang_type GTY(()) {union lang_tree_node t; }; (TYPE_LANG_SPECIFIC (INTEGER_TYPE_CHECK (NODE)) = (struct lang_type *) (X)) /* For INTEGER_TYPE, stores the RM_Size of the type. */ -#define TYPE_RM_SIZE_INT(NODE) (INTEGER_TYPE_CHECK (NODE)->type.values) +#define TYPE_RM_SIZE_INT(NODE) TYPE_LANG_SLOT_1 (INTEGER_TYPE_CHECK (NODE)) /* Likewise for ENUMERAL_TYPE. */ #define TYPE_RM_SIZE_ENUM(NODE) \ |

