This is the mail archive of the gcc-patches@gcc.gnu.org mailing list for the GCC 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

2007-07-28  Kazu Hirata  <kazu@codesourcery.com>

	* gfortran.h, interface.c, resolve.c, symbol.c: Fix comment
	typos.
	* intrinsic.texi, invoke.texi: Fix typos.

Index: fortran/gfortran.h
===================================================================
--- fortran/gfortran.h	(revision 127025)
+++ fortran/gfortran.h	(working copy)
@@ -157,7 +157,7 @@ typedef enum
 { FORM_FREE, FORM_FIXED, FORM_UNKNOWN }
 gfc_source_form;
 
-/* Basic types.  BT_VOID is used by ISO C BInding so funcs like c_f_pointer
+/* Basic types.  BT_VOID is used by ISO C Binding so funcs like c_f_pointer
    can take any arg with the pointer attribute as a param.  */
 typedef enum
 { BT_UNKNOWN = 1, BT_INTEGER, BT_REAL, BT_COMPLEX,
Index: fortran/interface.c
===================================================================
--- fortran/interface.c	(revision 127025)
+++ fortran/interface.c	(working copy)
@@ -1400,7 +1400,7 @@ get_sym_storage_size (gfc_symbol *sym)
 
 /* Returns the storage size of an expression (actual argument) or
    zero if it cannot be determined. For an array element, it returns
-   the remaing size as the element sequence consists of all storage
+   the remaining size as the element sequence consists of all storage
    units of the actual argument up to the end of the array.  */
 
 static unsigned long
Index: fortran/intrinsic.texi
===================================================================
--- fortran/intrinsic.texi	(revision 127025)
+++ fortran/intrinsic.texi	(working copy)
@@ -2082,7 +2082,7 @@ Inquiry function
 
 @item @emph{Arguments}:
 @multitable @columnfractions .15 .70
-@item @var{x} @tab Associated scalar pointer or interoperatable scalar
+@item @var{x} @tab Associated scalar pointer or interoperable scalar
 		   or allocated allocatable variable with @code{TARGET}
 		   attribute.
 @end multitable
Index: fortran/invoke.texi
===================================================================
--- fortran/invoke.texi	(revision 127025)
+++ fortran/invoke.texi	(working copy)
@@ -450,7 +450,7 @@ check that the declared interfaces are c
 
 @item -Wnonstd-intrinsics
 @opindex @code{Wnonstd-intrinsics}
-@cindex warnings, non-stdandard intrinsics
+@cindex warnings, non-standard intrinsics
 Warn if the user tries to use an intrinsic that does not belong to the 
 standard the user has chosen via the @option{-std} option.
 
Index: fortran/resolve.c
===================================================================
--- fortran/resolve.c	(revision 127025)
+++ fortran/resolve.c	(working copy)
@@ -2386,7 +2386,7 @@ gfc_iso_c_sub_interface (gfc_code *c, gf
     }
   else if (sym->intmod_sym_id == ISOCBINDING_ASSOCIATED)
     {
-      /* TODO: Figure out if this is even reacable; this part of the
+      /* TODO: Figure out if this is even reachable; this part of the
          conditional may not be necessary.  */
       int num_args = 0;
       if (c->ext.actual->next == NULL)
Index: fortran/symbol.c
===================================================================
--- fortran/symbol.c	(revision 127025)
+++ fortran/symbol.c	(working copy)
@@ -3454,7 +3454,7 @@ gen_shape_param (gfc_formal_arglist **he
      of BT_INTEGER type.  */
   param_sym->ts.type = BT_VOID;
 
-  /* Initialize the kind to default integer.  However, it will be overriden
+  /* Initialize the kind to default integer.  However, it will be overridden
      during resolution to match the kind of the SHAPE parameter given as
      the actual argument (to allow for any valid integer kind).  */
   param_sym->ts.kind = gfc_default_integer_kind;   


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