[fortran] Remove semicolon after do {} while (0) in match macros

2017-11-05  Tom de Vries  <tom@codesourcery.com>

	PR other/82784
	* parse.c (match, matcha, matchs, matcho, matchds, matchdo): Remove
	semicolon after "do {} while (0)".

From-SVN: r254422

diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog
index 40c1100833fa711754e23d41e0723a7136c3512c..008d86fe060801d3160c997ec09e992b3a761de3 100644 (file)
--- a/gcc/fortran/ChangeLog
+++ b/gcc/fortran/ChangeLog
@@ -1,3 +1,9 @@
+2017-11-05  Tom de Vries  <tom@codesourcery.com>
+
+       PR other/82784
+       * parse.c (match, matcha, matchs, matcho, matchds, matchdo): Remove
+       semicolon after "do {} while (0)".
+
 2017-11-04  Andre Vehreschild  <vehre@gcc.gnu.org>
 
        * trans-expr.c (gfc_trans_assignment_1): Character kind conversion may

diff --git a/gcc/fortran/parse.c b/gcc/fortran/parse.c
index e4deff9c79e01cf591ea4ba479a99c60f9386d49..d025c9129217460091d4ee39432140de9b08e60e 100644 (file)
--- a/gcc/fortran/parse.c
+++ b/gcc/fortran/parse.c
@@ -132,7 +132,7 @@ use_modules (void)
        return st;                                              \
       else                                                     \
        undo_new_statement ();                                  \
-    } while (0);
+    } while (0)
 
 
 /* This is a specialist version of decode_statement that is used
@@ -606,7 +606,7 @@ decode_statement (void)
        return st;                                              \
       else                                                     \
        undo_new_statement ();                                  \
-    } while (0);
+    } while (0)
 
 static gfc_statement
 decode_oacc_directive (void)
@@ -728,7 +728,7 @@ decode_oacc_directive (void)
        }                                                       \
       else                                                     \
        undo_new_statement ();                                  \
-    } while (0);
+    } while (0)
 
 /* Like match, but don't match anything if not -fopenmp
    and if spec_only, goto do_spec_only without actually matching.  */
@@ -746,7 +746,7 @@ decode_oacc_directive (void)
        }                                                       \
       else                                                     \
        undo_new_statement ();                                  \
-    } while (0);
+    } while (0)
 
 /* Like match, but set a flag simd_matched if keyword matched.  */
 #define matchds(keyword, subr, st)                             \
@@ -759,7 +759,7 @@ decode_oacc_directive (void)
        }                                                       \
       else                                                     \
        undo_new_statement ();                                  \
-    } while (0);
+    } while (0)
 
 /* Like match, but don't match anything if not -fopenmp.  */
 #define matchdo(keyword, subr, st)                             \
@@ -774,7 +774,7 @@ decode_oacc_directive (void)
        }                                                       \
       else                                                     \
        undo_new_statement ();                                  \
-    } while (0);
+    } while (0)
 
 static gfc_statement
 decode_omp_directive (void)