From: Andre Vehreschild <vehre@gcc.gnu.org>
Date: Wed, 30 Nov 2016 14:34:13 +0000 (+0100)
Subject: single.c (_gfortran_caf_is_present): Prevent fallthrough warnings.
X-Git-Tag: basepoints/gcc-8~2676
X-Git-Url: http://git.ipfire.org/?a=commitdiff_plain;h=9a0f271862f5a029c046ed49468ed1bbfcce9e00;p=thirdparty%2Fgcc.git

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 5e2932ca007e..3eceed900875 100644
--- 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: