diff options
author | ebotcazou <ebotcazou@138bc75d-0d04-0410-961f-82ee72b054a4> | 2010-04-12 10:00:13 +0000 |
---|---|---|
committer | ebotcazou <ebotcazou@138bc75d-0d04-0410-961f-82ee72b054a4> | 2010-04-12 10:00:13 +0000 |
commit | 30d12889964341eed3f23cab1dbb43d122634784 (patch) | |
tree | 47f2f8e659d1353465936d33a9982cdbaddb3f3b /gcc/testsuite/gnat.dg/aggr14.adb | |
parent | 0ef106fc6f745b834e9a3f93075736d6f1eeb498 (diff) | |
download | gcc-30d12889964341eed3f23cab1dbb43d122634784.tar.gz |
* expr.c (categorize_ctor_elements_1): Properly count sub-elements of
non-constant aggregate elements.
* gimplify.c (gimplify_init_constructor): Do not pre-evaluate if this
is a real initialization.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@158219 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/testsuite/gnat.dg/aggr14.adb')
-rw-r--r-- | gcc/testsuite/gnat.dg/aggr14.adb | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/gcc/testsuite/gnat.dg/aggr14.adb b/gcc/testsuite/gnat.dg/aggr14.adb new file mode 100644 index 00000000000..46f5af42a0d --- /dev/null +++ b/gcc/testsuite/gnat.dg/aggr14.adb @@ -0,0 +1,8 @@ +-- { dg-do run } + +with Aggr14_Pkg; use Aggr14_Pkg; + +procedure Aggr14 is +begin + Proc; +end; |