trans-array.c (gfc_conv_ss_startstride): Merge two switch cases.

	* trans-array.c	(gfc_conv_ss_startstride): Merge two switch cases.

From-SVN: r179694

diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog
index a4bf8a0..3437d1d 100644 (file)
--- a/gcc/fortran/ChangeLog
+++ b/gcc/fortran/ChangeLog
@@ -1,5 +1,9 @@
 2011-10-07  Mikael Morin  <mikael.morin@sfr.fr>
 
+       * trans-array.c (gfc_conv_ss_startstride): Merge two switch cases.
+
+2011-10-07  Mikael Morin  <mikael.morin@sfr.fr>
+
        * trans-array.c (gfc_conv_section_startstride): Remove coarray argument.
        Remove conditions on coarray.
        (gfc_conv_ss_startstride): Update call to gfc_conv_section_startstride.

diff --git a/gcc/fortran/trans-array.c b/gcc/fortran/trans-array.c
index a034886..86eb6c8 100644 (file)
--- a/gcc/fortran/trans-array.c
+++ b/gcc/fortran/trans-array.c
@@ -3280,9 +3280,6 @@ gfc_conv_ss_startstride (gfc_loopinfo * loop)
            {
            case GFC_ISYM_LBOUND:
            case GFC_ISYM_UBOUND:
-             loop->dimen = ss->data.info.dimen;
-             goto done;
-
            case GFC_ISYM_LCOBOUND:
            case GFC_ISYM_UCOBOUND:
            case GFC_ISYM_THIS_IMAGE: