aboutsummaryrefslogtreecommitdiff
path: root/gcc
diff options
context:
space:
mode:
Diffstat (limited to 'gcc')
-rw-r--r--gcc/ada/ChangeLog4
-rw-r--r--gcc/ada/trans.c5
-rw-r--r--gcc/ada/utils2.c6
3 files changed, 8 insertions, 7 deletions
diff --git a/gcc/ada/ChangeLog b/gcc/ada/ChangeLog
index b2aecad..dce151b 100644
--- a/gcc/ada/ChangeLog
+++ b/gcc/ada/ChangeLog
@@ -1,3 +1,7 @@
+Thu Nov 15 18:16:17 2001 Richard Kenner <kenner@vlsi1.ultra.nyu.edu>
+
+ * trans.c, utils2.c: Remove PALIGN parameter to get_inner_reference.
+
2001-11-15 Neil Booth <neil@daikokuya.demon.co.uk>
* misc.c (gnat_init): Change prototype. Include the
diff --git a/gcc/ada/trans.c b/gcc/ada/trans.c
index daa2469..7db952e 100644
--- a/gcc/ada/trans.c
+++ b/gcc/ada/trans.c
@@ -6,7 +6,7 @@
* *
* C Implementation File *
* *
- * $Revision$
+ * $Revision: 1.4 $
* *
* Copyright (C) 1992-2001, Free Software Foundation, Inc. *
* *
@@ -1421,7 +1421,6 @@ tree_transform (gnat_node)
tree gnu_inner;
enum machine_mode mode;
int unsignedp, volatilep;
- unsigned int alignment;
gnu_result_type = get_unpadded_type (Etype (gnat_node));
gnu_prefix = remove_conversions (gnu_prefix);
@@ -1444,7 +1443,7 @@ tree_transform (gnat_node)
gigi_abort (310);
get_inner_reference (gnu_prefix, &bitsize, &bitpos, &gnu_offset,
- &mode, &unsignedp, &volatilep, &alignment);
+ &mode, &unsignedp, &volatilep);
if (TREE_CODE (gnu_prefix) == COMPONENT_REF)
diff --git a/gcc/ada/utils2.c b/gcc/ada/utils2.c
index a5363a7..e9b5429 100644
--- a/gcc/ada/utils2.c
+++ b/gcc/ada/utils2.c
@@ -6,7 +6,7 @@
* *
* C Implementation File *
* *
- * $Revision$
+ * $Revision: 1.3 $
* *
* Copyright (C) 1992-2001, Free Software Foundation, Inc. *
* *
@@ -1164,11 +1164,9 @@ build_unary_op (op_code, result_type, operand)
tree offset, inner;
enum machine_mode mode;
int unsignedp, volatilep;
- unsigned int alignment;
inner = get_inner_reference (operand, &bitsize, &bitpos, &offset,
- &mode, &unsignedp, &volatilep,
- &alignment);
+ &mode, &unsignedp, &volatilep);
/* If INNER is a padding type whose field has a self-referential
size, convert to that inner type. We know the offset is zero