diff options
| author | Kazu Hirata <kazu@cs.umass.edu> | 2004-09-16 16:00:45 +0000 |
|---|---|---|
| committer | Kazu Hirata <kazu@gcc.gnu.org> | 2004-09-16 16:00:45 +0000 |
| commit | 1f2959f06e9093dfc6e717e0839988046883b8bb (patch) | |
| tree | d4390e21373fcfa884178f5708c587e4da66100a /gcc/fortran/f95-lang.c | |
| parent | d1f05f931e1689f7a0811acc39379831d40dcea9 (diff) | |
| download | gcc-1f2959f06e9093dfc6e717e0839988046883b8bb.zip gcc-1f2959f06e9093dfc6e717e0839988046883b8bb.tar.gz gcc-1f2959f06e9093dfc6e717e0839988046883b8bb.tar.bz2 | |
array.c, [...]: Fix comment typos.
* array.c, data.c, decl.c, dependency.c, error.c, f95-lang.c,
interface.c, intrinsic.c, io.c, misc.c, module.c, parse.h,
resolve.c, scanner.c, trans-array.c, trans-array.h,
trans-common.c, trans-const.h, trans-decl.c, trans-expr.c,
trans-intrinsic.c, trans-stmt.c, trans-types.c, trans.c,
trans.h: Fix comment typos. Follow spelling conventions.
From-SVN: r87605
Diffstat (limited to 'gcc/fortran/f95-lang.c')
| -rw-r--r-- | gcc/fortran/f95-lang.c | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/gcc/fortran/f95-lang.c b/gcc/fortran/f95-lang.c index 107fb75..d5e436d 100644 --- a/gcc/fortran/f95-lang.c +++ b/gcc/fortran/f95-lang.c @@ -403,7 +403,7 @@ pushlevel (int ignore ATTRIBUTE_UNUSED) tree poplevel (int keep, int reverse, int functionbody) { - /* Points to a BLOCK tree node. This is the BLOCK node construted for the + /* Points to a BLOCK tree node. This is the BLOCK node constructed for the binding level that we are about to exit and which is returned by this routine. */ tree block_node = NULL_TREE; @@ -413,7 +413,7 @@ poplevel (int keep, int reverse, int functionbody) /* Reverse the list of XXXX_DECL nodes if desired. Note that the ..._DECL nodes chained through the `names' field of current_binding_level are in - reverse order except for PARM_DECL node, which are explicitely stored in + reverse order except for PARM_DECL node, which are explicitly stored in the right order. */ decl_chain = (reverse) ? nreverse (current_binding_level->names) : current_binding_level->names; @@ -665,7 +665,7 @@ gfc_mark_addressable (tree exp) int ggc_p = 1; -/* Builtin function initialisation. */ +/* Builtin function initialization. */ /* Return a definition for a builtin function named NAME and whose data type is TYPE. TYPE should be a function type with argument types. @@ -752,7 +752,7 @@ build_builtin_fntypes (tree * fntype, tree type) } -/* Initialisation of builtin function nodes. */ +/* Initialization of builtin function nodes. */ static void gfc_init_builtin_functions (void) |