OSDN Git Service

* options.c, primary.c, resolve.c, trans-common.c: Fix typos
authorkazu <kazu@138bc75d-0d04-0410-961f-82ee72b054a4>
Mon, 29 May 2006 05:19:37 +0000 (05:19 +0000)
committerkazu <kazu@138bc75d-0d04-0410-961f-82ee72b054a4>
Mon, 29 May 2006 05:19:37 +0000 (05:19 +0000)
in error messages.

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

gcc/fortran/ChangeLog
gcc/fortran/options.c
gcc/fortran/primary.c
gcc/fortran/resolve.c
gcc/fortran/trans-common.c

index f264b29..efcf739 100644 (file)
@@ -1,3 +1,8 @@
+2006-05-29  Kazu Hirata  <kazu@codesourcery.com>
+
+       * options.c, primary.c, resolve.c, trans-common.c: Fix typos
+       in error messages.
+
 2006-05-28  Kazu Hirata  <kazu@codesourcery.com>
 
        * check.c, expr.c, resolve.c, trans-common.c,
index 278a346..6add2b8 100644 (file)
@@ -533,7 +533,7 @@ gfc_handle_option (size_t scode, const char *arg, int value)
 
     case OPT_fmax_identifier_length_:
       if (value > GFC_MAX_SYMBOL_LEN)
-       gfc_fatal_error ("Maximum supported idenitifier length is %d",
+       gfc_fatal_error ("Maximum supported identifier length is %d",
                         GFC_MAX_SYMBOL_LEN);
       gfc_option.max_identifier_length = value;
       break;
index 967bcb0..8fe1294 100644 (file)
@@ -265,7 +265,7 @@ match_hollerith_constant (gfc_expr ** result)
        }
       if (e->ts.kind != gfc_default_integer_kind)
        {
-         gfc_error ("Invalid Hollerith constant: Interger kind at %L "
+         gfc_error ("Invalid Hollerith constant: Integer kind at %L "
                "should be default", &old_loc);
          goto cleanup;
        }
index c662947..fef969f 100644 (file)
@@ -3992,7 +3992,7 @@ gfc_find_forall_index (gfc_expr *expr, gfc_symbol *symbol)
               break;
 
             default:
-              gfc_error("expresion reference type error at %L", &expr->where);
+              gfc_error("expression reference type error at %L", &expr->where);
             }
           tmp = tmp->next;
         }
index 856eeeb..f3b0f12 100644 (file)
@@ -848,7 +848,7 @@ align_segment (unsigned HOST_WIDE_INT * palign)
            {
              /* Aligning this field would misalign a previous field.  */
              gfc_error ("The equivalence set for variable '%s' "
-                        "declared at %L violates alignment requirents",
+                        "declared at %L violates alignment requirements",
                         s->sym->name, &s->sym->declared_at);
            }
          offset += this_offset;