match.c (match_arithmetic_if): Remove gfc_ prefix and correct comment according to...

	* match.c (match_arithmetic_if): Remove gfc_ prefix and correct
	comment according to GNU coding style.

From-SVN: r97890

diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog
index 4c331d9ff08dc1f15468f4bac409e8d98ce4964c..95e2cee227abecf3567ca2f190f289d769a7f2cd 100644 (file)
--- a/gcc/fortran/ChangeLog
+++ b/gcc/fortran/ChangeLog
@@ -1,3 +1,8 @@
+2005-04-09  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
+
+       * match.c (match_arithmetic_if): Remove gfc_ prefix and correct
+       comment according to GNU coding style.
+
 2005-04-08  Diego Novillo  <dnovillo@redhat.com>
 
        * match.c (gfc_match_arithmetic_if): Declare static.

diff --git a/gcc/fortran/match.c b/gcc/fortran/match.c
index 3a0bac5cccd43de0b1b2537ef07d4b9bf200c75a..0a173b86ea0d29e379487349fd845b301df0b973 100644 (file)
--- a/gcc/fortran/match.c
+++ b/gcc/fortran/match.c
@@ -900,11 +900,11 @@ cleanup:
 
 
 /* We try to match an easy arithmetic IF statement. This only happens
- * when just after having encountered a simple IF statement. This code
- * is really duplicate with parts of the gfc_match_if code, but this is
- * *much* easier.  */
+   when just after having encountered a simple IF statement. This code
+   is really duplicate with parts of the gfc_match_if code, but this is
+   *much* easier.  */
 static match
-gfc_match_arithmetic_if (void)
+match_arithmetic_if (void)
 {
   gfc_st_label *l1, *l2, *l3;
   gfc_expr *expr;
@@ -1069,7 +1069,7 @@ gfc_match_if (gfc_statement * if_type)
     match ("exit", gfc_match_exit, ST_EXIT)
     match ("forall", match_simple_forall, ST_FORALL)
     match ("go to", gfc_match_goto, ST_GOTO)
-    match ("if", gfc_match_arithmetic_if, ST_ARITHMETIC_IF)
+    match ("if", match_arithmetic_if, ST_ARITHMETIC_IF)
     match ("inquire", gfc_match_inquire, ST_INQUIRE)
     match ("nullify", gfc_match_nullify, ST_NULLIFY)
     match ("open", gfc_match_open, ST_OPEN)