aboutsummaryrefslogtreecommitdiff
path: root/gcc/ada/misc.c
diff options
context:
space:
mode:
authorNathanael Nerode <neroden@gcc.gnu.org>2003-06-10 21:48:32 +0000
committerNathanael Nerode <neroden@gcc.gnu.org>2003-06-10 21:48:32 +0000
commite8face4c5909cdc9a03029677d0612a82d557199 (patch)
tree8478b1a1a17730fe919518390f0cd21930827389 /gcc/ada/misc.c
parent907129969df130b1dd0b1e1870126f9bad99e2ee (diff)
downloadgcc-e8face4c5909cdc9a03029677d0612a82d557199.zip
gcc-e8face4c5909cdc9a03029677d0612a82d557199.tar.gz
gcc-e8face4c5909cdc9a03029677d0612a82d557199.tar.bz2
* init.c, misc.c, trans.c, utils.c: Remove dead code.
From-SVN: r67735
Diffstat (limited to 'gcc/ada/misc.c')
-rw-r--r--gcc/ada/misc.c15
1 files changed, 1 insertions, 14 deletions
diff --git a/gcc/ada/misc.c b/gcc/ada/misc.c
index 6937f8b..17cc27c 100644
--- a/gcc/ada/misc.c
+++ b/gcc/ada/misc.c
@@ -586,21 +586,8 @@ static void
gnat_adjust_rli (rli)
record_layout_info rli ATTRIBUTE_UNUSED;
{
-#if 0
- /* This code seems to have no actual effect; record_align should already
+ /* This function has no actual effect; record_align should already
reflect the largest alignment desired by a field. jason 2003-04-01 */
- unsigned int record_align = rli->unpadded_align;
- tree field;
-
- /* If any fields have variable size, we need to force the record to be at
- least as aligned as the alignment of that type. */
- for (field = TYPE_FIELDS (rli->t); field; field = TREE_CHAIN (field))
- if (TREE_CODE (DECL_SIZE_UNIT (field)) != INTEGER_CST)
- record_align = MAX (record_align, DECL_ALIGN (field));
-
- if (TYPE_PACKED (rli->t))
- rli->record_align = record_align;
-#endif
}
/* Make a TRANSFORM_EXPR to later expand GNAT_NODE into code. */