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 a4bf8a01ee9c3332345a93322e69579bbafde976..3437d1dd09cc37bccab5949c32b2700a3809afe1 100644 (file)
--- a/gcc/fortran/ChangeLog
+++ b/gcc/fortran/ChangeLog
@@ -1,3 +1,7 @@
+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.

diff --git a/gcc/fortran/trans-array.c b/gcc/fortran/trans-array.c
index a034886f534826f770de2c2b02056f1a0b902744..86eb6c8ccdbebc6c0feed042a178059f48ee4942 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: