aboutsummaryrefslogtreecommitdiff
path: root/gcc/fortran/decl.c
diff options
context:
space:
mode:
authorKazu Hirata <kazu@cs.umass.edu>2004-11-08 14:56:41 +0000
committerKazu Hirata <kazu@gcc.gnu.org>2004-11-08 14:56:41 +0000
commitf7b529fae761c8603888bee76614147954754e75 (patch)
treebf128e11ba70bddbb7f8b8beb206603bd3c66ad5 /gcc/fortran/decl.c
parent03fd3f84d88fb235f16093b9da6e91e6f4a7c253 (diff)
downloadgcc-f7b529fae761c8603888bee76614147954754e75.zip
gcc-f7b529fae761c8603888bee76614147954754e75.tar.gz
gcc-f7b529fae761c8603888bee76614147954754e75.tar.bz2
arith.c, [...]: Fix comment formatting.
* arith.c, array.c, decl.c, expr.c, f95-lang.c, gfortran.h, gfortranspec.c, interface.c, intrinsic.c, iresolve.c, match.c, module.c, parse.c, parse.h, primary.c, resolve.c, scanner.c, trans-array.c, trans-array.h, trans-expr.c, trans-intrinsic.c, trans-io.c, trans-stmt.c, trans.h: Fix comment formatting. From-SVN: r90266
Diffstat (limited to 'gcc/fortran/decl.c')
-rw-r--r--gcc/fortran/decl.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/gcc/fortran/decl.c b/gcc/fortran/decl.c
index 508c90c..5f7e846 100644
--- a/gcc/fortran/decl.c
+++ b/gcc/fortran/decl.c
@@ -401,7 +401,7 @@ match_old_style_init (const char *name)
/* Match the stuff following a DATA statement. If ERROR_FLAG is set,
we are matching a DATA statement and are therefore issuing an error
if we encounter something unexpected, if not, we're trying to match
- an old-style intialization expression of the form INTEGER I /2/. */
+ an old-style intialization expression of the form INTEGER I /2/. */
match
gfc_match_data (void)
@@ -3292,7 +3292,7 @@ loop:
components. The ways this can happen is via a function
definition, an INTRINSIC statement or a subtype in another
derived type that is a pointer. The first part of the AND clause
- is true if a the symbol is not the return value of a function. */
+ is true if a the symbol is not the return value of a function. */
if (sym->attr.flavor != FL_DERIVED
&& gfc_add_flavor (&sym->attr, FL_DERIVED, NULL) == FAILURE)
return MATCH_ERROR;