This is the mail archive of the fortran@gcc.gnu.org mailing list for the GNU Fortran project.


Index Nav: [Date Index] [Subject Index] [Author Index] [Thread Index]
Message Nav: [Date Prev] [Date Next] [Thread Prev] [Thread Next]
Other format: [Raw text]

[patch] fortran/*: Fix comment typos.


Hi,

Committed as obvious.

Kazu Hirata

2006-04-08  Kazu Hirata  <kazu@codesourcery.com>

	* gfortran.texi: Fix typos.  Follow spelling conventions.
	* resolve.c, trans-expr.c, trans-stmt.c: Fix comment typos.
	Follow spelling conventions.

Index: fortran/gfortran.texi
===================================================================
--- fortran/gfortran.texi	(revision 112778)
+++ fortran/gfortran.texi	(working copy)
@@ -548,7 +548,7 @@ Environment variable forcing standard ou
 @chapter Runtime:  Influencing runtime behavior with environment variables
 @cindex Runtime
 
-The behaviour of the @command{gfortran} can be influenced by
+The behavior of the @command{gfortran} can be influenced by
 environment variables.
 
 Malformed environment variables are silently ignored.
@@ -610,7 +610,7 @@ this is also missing, the default is @fi
 This environment variable controls wether all output is unbuffered.
 If the first letter is @samp{y}, @samp{Y} or @samp{1}, all output is
 unbuffered. This will slow down large writes.  If the first letter is
-@samp{n}, @samp{N}  or @samp{0}, output is bufferred.  This is the
+@samp{n}, @samp{N}  or @samp{0}, output is buffered.  This is the
 default.
 
 @node GFORTRAN_SHOW_LOCUS
@@ -626,7 +626,7 @@ for runtime errors. The default is to pr
 
 If the first letter is @samp{y}, @samp{Y} or @samp{1},
 a plus sign is printed
-where permitted by the Fortran standard.  If the first lettter
+where permitted by the Fortran standard.  If the first letter
 is @samp{n}, @samp{N} or @samp{0}, a plus sign is not printed
 in most cases. Default is not to print plus signs.
 
Index: fortran/resolve.c
===================================================================
--- fortran/resolve.c	(revision 112778)
+++ fortran/resolve.c	(working copy)
@@ -701,7 +701,7 @@ procedure_kind (gfc_symbol * sym)
 }
 
 /* Check references to assumed size arrays.  The flag need_full_assumed_size
-   is non-zero when matching actual arguments.  */
+   is nonzero when matching actual arguments.  */
 
 static int need_full_assumed_size = 0;
 
@@ -1342,7 +1342,7 @@ resolve_function (gfc_expr * expr)
 	     && expr->value.function.isym->generic_id != GFC_ISYM_PRESENT)
     {
       /* Array instrinsics must also have the last upper bound of an
-	 asumed size array argument.  UBOUND and SIZE have to be
+	 assumed size array argument.  UBOUND and SIZE have to be
 	 excluded from the check if the second argument is anything
 	 than a constant.  */
       int inquiry;
@@ -4843,7 +4843,7 @@ resolve_fl_procedure (gfc_symbol *sym, i
 
   /* Ensure that derived type for are not of a private type.  Internal
      module procedures are excluded by 2.2.3.3 - ie. they are not
-     externally accessible and can access all the objects accesible in
+     externally accessible and can access all the objects accessible in
      the host. */
   if (!(sym->ns->parent
 	    && sym->ns->parent->proc_name->attr.flavor == FL_MODULE)
Index: fortran/trans-expr.c
===================================================================
--- fortran/trans-expr.c	(revision 112778)
+++ fortran/trans-expr.c	(working copy)
@@ -1712,7 +1712,7 @@ gfc_conv_aliased_arg (gfc_se * parmse, g
      temporary array has lbounds of zero and strides of one in all
      dimensions, so this is very simple.  The offset is only computed
      outside the innermost loop, so the overall transfer could be
-     optimised further.  */
+     optimized further.  */
   info = &rse.ss->data.info;
 
   tmp_index = gfc_index_zero_node;
Index: fortran/trans-stmt.c
===================================================================
--- fortran/trans-stmt.c	(revision 112778)
+++ fortran/trans-stmt.c	(working copy)
@@ -2650,7 +2650,7 @@ gfc_evaluate_where_mask (gfc_expr * me, 
       gfc_conv_expr (&rse, me);
     }
 
-  /* Variable to evalate mask condition.  */
+  /* Variable to evaluate mask condition.  */
   cond = gfc_create_var (mask_type, "cond");
   if (mask && (cmask || pmask))
     mtmp = gfc_create_var (mask_type, "mask");


Index Nav: [Date Index] [Subject Index] [Author Index] [Thread Index]
Message Nav: [Date Prev] [Date Next] [Thread Prev] [Thread Next]