trans-stmt.c: Fix a typo

2006-10-16  Tobias Burnus <burnus@net-b.de>

       * trans-stmt.c: Fix a typo
       * invoke.texi: Fix typos
       * resolve.c: Fix a comment typo
       * trans-decl.c: Fix a comment typo
       * primary.c: Fix a comment typo

From-SVN: r117781

gcc/fortran/ChangeLog

@@ -1,3 +1,11 @@
+2006-10-16  Tobias Burnus <burnus@net-b.de>
+
+	* trans-stmt.c: Fix a typo
+	* invoke.texi: Fix typos
+	* resolve.c: Fix a comment typo
+	* trans-decl.c: Fix a comment typo
+	* primary.c: Fix a comment typo
+
 2006-10-15  Steven G. Kargl  <kargl@gcc.gnu.org>
 
 	PR fortran/29403

gcc/fortran/invoke.texi

@@ -845,13 +845,13 @@ with code compiled without this option, and may execute slower.
 @item -frepack-arrays
 @cindex Repacking arrays
 In some circumstances GNU Fortran may pass assumed shape array
-sections via a descriptor describing a discontiguous area of memory.
+sections via a descriptor describing a discontinuous area of memory.
 This option adds code to the function prologue to repack the data into
 a contiguous block at runtime.
 
 This should result in faster accesses to the array.  However it can introduce
 significant overhead to the function call, especially  when the passed data
-is discontiguous.
+is discontinuous.
 
 @cindex -fshort-enums
 @item -fshort-enums

gcc/fortran/primary.c

@@ -463,7 +463,7 @@ match_real_constant (gfc_expr ** result, int signflag)
       c = gfc_next_char ();
     }
 
-  /* Scan significand.  */
+  /* Scan significant.  */
   for (;; c = gfc_next_char (), count++)
     {
       if (c == '.')

gcc/fortran/resolve.c

@@ -1528,7 +1528,7 @@ resolve_function (gfc_expr * expr)
 	     && expr->value.function.isym->generic_id != GFC_ISYM_LOC
 	     && expr->value.function.isym->generic_id != GFC_ISYM_PRESENT)
     {
-      /* Array instrinsics must also have the last upper bound of an
+      /* Array intrinsics must also have the last upper bound of an
 	 assumed size array argument.  UBOUND and SIZE have to be
 	 excluded from the check if the second argument is anything
 	 than a constant.  */

gcc/fortran/trans-decl.c

@@ -701,7 +701,7 @@ gfc_build_dummy_array_decl (gfc_symbol * sym, tree dummy)
   type = TREE_TYPE (type);
   if (GFC_DESCRIPTOR_TYPE_P (type))
     {
-      /* Create a decriptorless array pointer.  */
+      /* Create a descriptorless array pointer.  */
       as = sym->as;
       packed = 0;
       if (!gfc_option.flag_repack_arrays)

gcc/fortran/trans-stmt.c

@@ -625,7 +625,7 @@ gfc_trans_if (gfc_code * code)
 }
 
 
-/* Translage an arithmetic IF expression.
+/* Translate an arithmetic IF expression.
 
    IF (cond) label1, label2, label3 translates to