diff options
| author | Eric Botcazou <ebotcazou@adacore.com> | 2008-05-03 19:47:22 +0000 |
|---|---|---|
| committer | Eric Botcazou <ebotcazou@gcc.gnu.org> | 2008-05-03 19:47:22 +0000 |
| commit | 8f85525e4102574486728caf5e5aa3d91ab101e1 (patch) | |
| tree | edbdf6ee7b678c7d7daf005d8787b89e016bcbcf /gcc/ada/decl.c | |
| parent | 88f36b7eb6a153a914e9b4d678c1ddaddb842747 (diff) | |
| download | gcc-8f85525e4102574486728caf5e5aa3d91ab101e1.zip gcc-8f85525e4102574486728caf5e5aa3d91ab101e1.tar.gz gcc-8f85525e4102574486728caf5e5aa3d91ab101e1.tar.bz2 | |
decl.c (components_to_record): Zero the alignment of the qualified union built for the variant part upon...
* decl.c (components_to_record): Zero the alignment of the qualified
union built for the variant part upon creating it.
From-SVN: r134917
Diffstat (limited to 'gcc/ada/decl.c')
| -rw-r--r-- | gcc/ada/decl.c | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/gcc/ada/decl.c b/gcc/ada/decl.c index 9d933b7..68ea42b 100644 --- a/gcc/ada/decl.c +++ b/gcc/ada/decl.c @@ -6322,6 +6322,7 @@ components_to_record (tree gnu_record_type, Node_Id component_list, = make_node (unchecked_union ? UNION_TYPE : QUAL_UNION_TYPE); TYPE_NAME (gnu_union_type) = gnu_union_name; + TYPE_ALIGN (gnu_union_type) = 0; TYPE_PACKED (gnu_union_type) = TYPE_PACKED (gnu_record_type); } |