* gfortran.h, interface.c, resolve.c, symbol.c: Fix comment

	typos.
	* intrinsic.texi, invoke.texi: Fix typos.

git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@127029 138bc75d-0d04-0410-961f-82ee72b054a4

diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog
index 9a345b34a9bab2db613325c24d6b8482a65c1af0..8563b1df525cfe1c4e37fa5de9442091c82b6e82 100644 (file)
--- a/gcc/fortran/ChangeLog
+++ b/gcc/fortran/ChangeLog
@@ -1,3 +1,9 @@
+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.
+
 2007-07-28  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
 
        PR fortran/31609

diff --git a/gcc/fortran/gfortran.h b/gcc/fortran/gfortran.h
index a668bf471c2848e025c2904a34a9c97a7b00ebe5..0be73851021ea2a9c81071aad003a6ce71e6631a 100644 (file)
--- a/gcc/fortran/gfortran.h
+++ b/gcc/fortran/gfortran.h
@@ -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,

diff --git a/gcc/fortran/interface.c b/gcc/fortran/interface.c
index b46e11477109a6afa52344b470fcab15c167c8e2..4160fd6a5e4c509cc195f6f1033caaff209bcb37 100644 (file)
--- a/gcc/fortran/interface.c
+++ b/gcc/fortran/interface.c
@@ -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

diff --git a/gcc/fortran/intrinsic.texi b/gcc/fortran/intrinsic.texi
index fb74e1bcfdcd08a706e60708dec8df25ba4541fe..42b5e3f7fbc028a8c730646283aa4fc4f0f0278b 100644 (file)
--- a/gcc/fortran/intrinsic.texi
+++ b/gcc/fortran/intrinsic.texi
@@ -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

diff --git a/gcc/fortran/invoke.texi b/gcc/fortran/invoke.texi
index fb0aa8793233a12fce97cec0440f1d22dbcad844..0ec9a9a53a71cf4aa63c0a1ab250e5dc56e89c69 100644 (file)
--- a/gcc/fortran/invoke.texi
+++ b/gcc/fortran/invoke.texi
@@ -450,7 +450,7 @@ check that the declared interfaces are consistent across program units.
 
 @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.
 

diff --git a/gcc/fortran/resolve.c b/gcc/fortran/resolve.c
index 88980093d2dace910ba8c1b668c6b4a0b8d0b632..afa1ed831193272e034b7f8784417685ab141364 100644 (file)
--- a/gcc/fortran/resolve.c
+++ b/gcc/fortran/resolve.c
@@ -2394,7 +2394,7 @@ gfc_iso_c_sub_interface (gfc_code *c, gfc_symbol *sym)
     }
   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)

diff --git a/gcc/fortran/symbol.c b/gcc/fortran/symbol.c
index 3674b31cd321a865710020cf06617265ca02eee5..bee66ede0a4ce177653a56534ada39f0271ecfc1 100644 (file)
--- a/gcc/fortran/symbol.c
+++ b/gcc/fortran/symbol.c
@@ -3454,7 +3454,7 @@ gen_shape_param (gfc_formal_arglist **head,
      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;