single.c (_gfortran_caf_is_present): Prevent fallthrough warnings.

libgfortran/ChangeLog:

2016-11-30  Andre Vehreschild  <vehre@gcc.gnu.org>

	* caf/single.c (_gfortran_caf_is_present): Prevent fallthrough
	warnings.

From-SVN: r243024

diff --git a/libgfortran/caf/single.c b/libgfortran/caf/single.c
index 5e2932ca007eca41da135bde997206400973e1d9..3eceed90087593d4bf000ca12b480cf16e74a3a5 100644 (file)
--- a/libgfortran/caf/single.c
+++ b/libgfortran/caf/single.c
@@ -2949,6 +2949,7 @@ _gfortran_caf_is_present (caf_token_t token,
                  if (riter->next == NULL)
                    break;
                  /* else fall through reporting an error.  */
+                 /* FALLTHROUGH */
                case CAF_ARR_REF_VECTOR:
                case CAF_ARR_REF_RANGE:
                case CAF_ARR_REF_OPEN_END:
@@ -2976,6 +2977,7 @@ _gfortran_caf_is_present (caf_token_t token,
                  if (riter->next == NULL)
                    break;
                  /* else fall through reporting an error.  */
+                 /* FALLTHROUGH */
                case CAF_ARR_REF_VECTOR:
                case CAF_ARR_REF_RANGE:
                case CAF_ARR_REF_OPEN_END: