Patchwork [fortran,5/5] PR 45648: Inline transpose part 2: Do dependency analysis in case of transpose optimization.

login
register
mail settings
Submitter Mikael Morin
Date Sept. 21, 2010, 7:07 p.m.
Message ID <201009212107.46503.mikael.morin@sfr.fr>
Download mbox | patch
Permalink /patch/65371/
State New
Headers show

Comments

Mikael Morin - Sept. 21, 2010, 7:07 p.m.
On Tuesday 21 September 2010 18:07:28 Mikael Morin wrote:
> On Tuesday 21 September 2010 16:05:33 Paul Richard Thomas wrote:
> > Mikael,
> > 
> > The complete patch and the testcase are OK for trunk.  Please commit
> > the whole lot in one go.
> 
> Will do.
> Thanks for the reviews.
> 
> Mikael

Committed at revision 164494.

For the assert concern, I added the following, just in case someone has a 
temporary brain failure one day. 

          /* Set the new lower bound.  */

Patch

diff --git a/trans-array.c b/trans-array.c
index 1bb4429..310a42b 100644
--- a/trans-array.c
+++ b/trans-array.c
@@ -5535,6 +5535,8 @@  gfc_conv_expr_descriptor (gfc_se * se, gfc_expr * expr, 
gf
          for (dim = 0; dim < ndim; dim++)
            if (info->dim[dim] == n)
              break;
+
+         /* loop exited early: the DIM being looked for has been found.  */
          gcc_assert (dim < ndim);