* c-decl.c (duplicate_decls, push_parm_decl): Remove leading

	capital from diagnostics.
	* c-lex.c (cb_file_change): Similarly.
	* c-parse.in : Similarly.
	* cfgrtl.c (verify_flow_info): Similarly.
	* collect2.c: Similarly.
	* cppfiles.c (find_include_file): Similarly.
	* cppinit.c (cpp_handle_option): Similarly.
	* cpplex.c (cpp_spell_token): Similarly.
	* cppmain.c (do_preprocessing): Similarly.
	* gcc.c (translate_options, process_command, do_spec1,
	main, pfatal_execute): Similarly.
	* genattr.c (main): Similarly.
	* genattrtab.c (check_attr_test, operate_exp, simplify_test_exp,
	write_test_expr, main): Similarly.
	* gencodes.c (main): Similarly.
	* genconfig.c (main): Similarly.
	* genconstants.c (main): Similarly.
	* genemit.c (main): Similarly.
	* genextract.c (main): Similarly.
	* genflags.c (main): Similarly.
	* genopinit.c (main): Similarly.
	* genoutput.c (process_template, main): Similarly.
	* genpeep.c (main): Similarly.
	* genrecog.c (main): Similarly.
	* gensupport.c (is_predicable, identify_predicable_attribute,
	alter_predicate_for_insn, init_md_reader_args, main): Similarly.
	* ggc-page.c (alloc_anon): Similarly.
	* mips-tfile.c (add_string, add_procedure, add_file, read_line,
	parse_begin, parse_bend, parse_def, parse_end, parse_file,
	parse_stabs_common, parse_stabs, write_varray, write_object,
	read_seek, copy_object, main, error): Similarly.
	* profile.c (compute_branch_probabilities): Similarly.
	* reg-stack.c (check_asm_stack_operands): Similarly.
	* reload.c (find_reloads): Similarly.
	* reload1.c (spill_failure, failed_reload): Similarly.
	* rtl-error.c (_fatal_insn_not_found): Similarly.
	* toplev.c (read_integral_parameter, crash_signal,
	decode_f_option, set_target_switch, parse_options_and_default_flags)
	: Similarly.
	* tradcif.y (parse_number, yylex): Similarly.
	* tradcpp.c (main, fancy_abort): Similarly.
	* tree.c (tree_check_failed): Similarly.
	* varray.c (varray_check_failed): Similarly.
	* xcoffout.c (xcoff_output_standard_types): Similarly.
cp:
	* call.c (build_java_interface_fn_ref): Similarly.
	* except.c (is_admissible_throw_operand): Similarly.
	* init.c (build_java_class_ref): Similarly.
	* xref.c (open_xref_file): Similarly.
objc:
	* objc-act.c (get_object_ref, lookup_and_install_protocols,
	build_objc_string_object, objc_declare_alias, build_ivar_chain,
	finish_message_expr, build_protocol_expr, is_public,
	start_class): Similarly.
testsuite:
	* objc.dg/alias.m: Update.
	* objc.dg/class-1.m: Update.
	* objc.dg/const-str-1.m: Update.
	* objc.dg/fwd-proto-1.m: Update.
	* objc.dg/id-1.m: Update.
	* objc.dg/super-class-1.m: Update.


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

50 files changed, 249 insertions, 206 deletions

diff --git a/gcc/ChangeLog b/gcc/ChangeLog
index fe9fc31dd15..df03675ad3c 100644
--- a/gcc/ChangeLog
+++ b/gcc/ChangeLog
@@ -1,3 +1,56 @@
+2001-12-02  Neil Booth  <neil@daikokuya.demon.co.uk>
+
+	* c-decl.c (duplicate_decls, push_parm_decl): Remove leading
+	capital from diagnostics.
+	* c-lex.c (cb_file_change): Similarly.
+	* c-parse.in : Similarly.
+	* cfgrtl.c (verify_flow_info): Similarly.
+	* collect2.c: Similarly.
+	* cppfiles.c (find_include_file): Similarly.
+	* cppinit.c (cpp_handle_option): Similarly.
+	* cpplex.c (cpp_spell_token): Similarly.
+	* cppmain.c (do_preprocessing): Similarly.
+	* gcc.c (translate_options, process_command, do_spec1,
+	main, pfatal_execute): Similarly.
+	* genattr.c (main): Similarly.
+	* genattrtab.c (check_attr_test, operate_exp, simplify_test_exp,
+	write_test_expr, main): Similarly.
+	* gencodes.c (main): Similarly.
+	* genconfig.c (main): Similarly.
+	* genconstants.c (main): Similarly.
+	* genemit.c (main): Similarly.
+	* genextract.c (main): Similarly.
+	* genflags.c (main): Similarly.
+	* genopinit.c (main): Similarly.
+	* genoutput.c (process_template, main): Similarly.
+	* genpeep.c (main): Similarly.
+	* genrecog.c (main): Similarly.
+	* gensupport.c (is_predicable, identify_predicable_attribute,
+	alter_predicate_for_insn, init_md_reader_args, main): Similarly.
+	* ggc-page.c (alloc_anon): Similarly.
+	* mips-tfile.c (add_string, add_procedure, add_file, read_line,
+	parse_begin, parse_bend, parse_def, parse_end, parse_file,
+	parse_stabs_common, parse_stabs, write_varray, write_object,
+	read_seek, copy_object, main, error): Similarly.
+	* profile.c (compute_branch_probabilities): Similarly.
+	* reg-stack.c (check_asm_stack_operands): Similarly.
+	* reload.c (find_reloads): Similarly.
+	* reload1.c (spill_failure, failed_reload): Similarly.
+	* rtl-error.c (_fatal_insn_not_found): Similarly.
+	* toplev.c (read_integral_parameter, crash_signal,
+	decode_f_option, set_target_switch, parse_options_and_default_flags)
+	: Similarly.
+	* tradcif.y (parse_number, yylex): Similarly.
+	* tradcpp.c (main, fancy_abort): Similarly.
+	* tree.c (tree_check_failed): Similarly.
+	* varray.c (varray_check_failed): Similarly.
+	* xcoffout.c (xcoff_output_standard_types): Similarly.
+objc:
+	* objc-act.c (get_object_ref, lookup_and_install_protocols,
+	build_objc_string_object, objc_declare_alias, build_ivar_chain,
+	finish_message_expr, build_protocol_expr, is_public,
+	start_class): Similarly.
+
 2001-12-01  Neil Booth  <neil@daikokuya.demon.co.uk>
 
 	* c-decl.c (duplicate_decls, parmlist_tags_warning): Remove
diff --git a/gcc/c-decl.c b/gcc/c-decl.c
index 63b2680f308..674759305a2 100644
--- a/gcc/c-decl.c
+++ b/gcc/c-decl.c
@@ -1621,13 +1621,13 @@ duplicate_decls (newdecl, olddecl, different_binding_level)
 	      if (TREE_CHAIN (t) == 0
 		  && TYPE_MAIN_VARIANT (type) != void_type_node)
 		{
-		  error ("A parameter list with an ellipsis can't match an empty parameter name list declaration");
+		  error ("a parameter list with an ellipsis can't match an empty parameter name list declaration");
 		  break;
 		}
 
 	      if (simple_type_promotes_to (type) != NULL_TREE)
 		{
-		  error ("An argument type that has a default promotion can't match an empty parameter name list declaration");
+		  error ("an argument type that has a default promotion can't match an empty parameter name list declaration");
 		  break;
 		}
 	    }
@@ -3765,7 +3765,7 @@ push_parm_decl (parm)
       olddecl = lookup_name (DECL_NAME (decl));
       if (pedantic && olddecl != 0 && TREE_CODE (olddecl) == TYPE_DECL)
 	pedwarn_with_decl (decl,
-			   "ANSI C forbids parameter `%s' shadowing typedef");
+			   "ISO C forbids parameter `%s' shadowing typedef");
     }
 #endif
 
diff --git a/gcc/c-lex.c b/gcc/c-lex.c
index d207833a7c9..94bc63e6609 100644
--- a/gcc/c-lex.c
+++ b/gcc/c-lex.c
@@ -297,7 +297,7 @@ cb_file_change (pfile, new_map)
 	{
 	  warning_with_file_and_line
 	    (input_filename, lineno,
-	     "This file contains more '%c's than '%c's",
+	     "this file contains more '%c's than '%c's",
 	     indent_level > input_file_stack->indent_level ? '{' : '}',
 	     indent_level > input_file_stack->indent_level ? '}' : '{');
 	}
diff --git a/gcc/c-parse.in b/gcc/c-parse.in
index c67d2442917..fe57047ec9c 100644
--- a/gcc/c-parse.in
+++ b/gcc/c-parse.in
@@ -1801,7 +1801,7 @@ ifobjc
 		    $$ = get_class_ivars (interface);
 		  else
 		    {
-		      error ("Cannot find interface declaration for `%s'",
+		      error ("cannot find interface declaration for `%s'",
 			     IDENTIFIER_POINTER ($3));
 		      $$ = NULL_TREE;
 		    }
diff --git a/gcc/cfgrtl.c b/gcc/cfgrtl.c
index 9313e1cfc29..66dd7ffcf2a 100644
--- a/gcc/cfgrtl.c
+++ b/gcc/cfgrtl.c
@@ -1542,7 +1542,7 @@ verify_flow_info ()
 	  break;
       if (!x)
 	{
-	  error ("End insn %d for block %d not found in the insn stream.",
+	  error ("end insn %d for block %d not found in the insn stream",
 		 INSN_UID (end), bb->index);
 	  err = 1;
 	}
@@ -1556,7 +1556,7 @@ verify_flow_info ()
 	     used by other passes.  */
 	  if (bb_info[INSN_UID (x)] != NULL)
 	    {
-	      error ("Insn %d is in multiple basic blocks (%d and %d)",
+	      error ("insn %d is in multiple basic blocks (%d and %d)",
 		     INSN_UID (x), bb->index, bb_info[INSN_UID (x)]->index);
 	      err = 1;
 	    }
@@ -1567,7 +1567,7 @@ verify_flow_info ()
 	}
       if (!x)
 	{
-	  error ("Head insn %d for block %d not found in the insn stream.",
+	  error ("head insn %d for block %d not found in the insn stream",
 		 INSN_UID (head), bb->index);
 	  err = 1;
 	}
@@ -1614,7 +1614,7 @@ verify_flow_info ()
 		    {
 		      error ("verify_flow_info: Incorrect fallthru %i->%i",
 			     e->src->index, e->dest->index);
-		      fatal_insn ("Wrong insn in the fallthru edge", insn);
+		      fatal_insn ("wrong insn in the fallthru edge", insn);
 		      err = 1;
 		    }
 	    }
@@ -1643,7 +1643,7 @@ verify_flow_info ()
 		|| (GET_CODE (insn) == NOTE
 		    && NOTE_LINE_NUMBER (insn) == NOTE_INSN_BASIC_BLOCK))
 		{
-		  error ("Missing barrier after block %i", bb->index);
+		  error ("missing barrier after block %i", bb->index);
 		  err = 1;
 		  break;
 		}
@@ -1654,7 +1654,7 @@ verify_flow_info ()
 	{
 	  if (e->dest != bb)
 	    {
-	      error ("Basic block %d pred edge is corrupted", bb->index);
+	      error ("basic block %d pred edge is corrupted", bb->index);
 	      fputs ("Predecessor: ", stderr);
 	      dump_edge_info (stderr, e, 0);
 	      fputs ("\nSuccessor: ", stderr);
@@ -1670,10 +1670,10 @@ verify_flow_info ()
 	   {
 	     debug_rtx (x);
 	     if (! BLOCK_FOR_INSN (x))
-	       error ("Insn %d is inside basic block %d but block_for_insn is NULL",
+	       error ("insn %d is inside basic block %d but block_for_insn is NULL",
 		      INSN_UID (x), bb->index);
 	     else
-	       error ("Insn %d is inside basic block %d but block_for_insn is %i",
+	       error ("insn %d is inside basic block %d but block_for_insn is %i",
 		      INSN_UID (x), bb->index, BLOCK_FOR_INSN (x)->index);
 	     err = 1;
 	   }
@@ -1722,8 +1722,8 @@ verify_flow_info ()
 		  || GET_CODE (x) == CODE_LABEL
 		  || GET_CODE (x) == BARRIER)
 		{
-		  error ("In basic block %d:", bb->index);
-		  fatal_insn ("Flow control insn inside a basic block", x);
+		  error ("in basic block %d:", bb->index);
+		  fatal_insn ("flow control insn inside a basic block", x);
 		}
 
 	      x = NEXT_INSN (x);
@@ -1743,7 +1743,7 @@ verify_flow_info ()
   for (i = -2; i < n_basic_blocks; ++i)
     if (edge_checksum[i + 2])
       {
-	error ("Basic block %i edge lists are corrupted", i);
+	error ("basic block %i edge lists are corrupted", i);
 	err = 1;
       }
 
@@ -1757,7 +1757,7 @@ verify_flow_info ()
 	  basic_block bb = NOTE_BASIC_BLOCK (x);
 	  num_bb_notes++;
 	  if (bb->index != last_bb_num_seen + 1)
-	    internal_error ("Basic blocks not numbered consecutively.");
+	    internal_error ("basic blocks not numbered consecutively.");
 
 	  last_bb_num_seen = bb->index;
 	}
@@ -1784,7 +1784,7 @@ verify_flow_info ()
 	      break;
 
 	    default:
-	      fatal_insn ("Insn outside basic block", x);
+	      fatal_insn ("insn outside basic block", x);
 	    }
 	}
 
@@ -1792,7 +1792,7 @@ verify_flow_info ()
 	  && GET_CODE (x) == JUMP_INSN
 	  && returnjump_p (x) && ! condjump_p (x)
 	  && ! (NEXT_INSN (x) && GET_CODE (NEXT_INSN (x)) == BARRIER))
-	    fatal_insn ("Return not followed by barrier", x);
+	    fatal_insn ("return not followed by barrier", x);
 
       x = NEXT_INSN (x);
     }
diff --git a/gcc/collect2.c b/gcc/collect2.c
index f527b94b7cb..19009e30180 100644
--- a/gcc/collect2.c
+++ b/gcc/collect2.c
@@ -2897,7 +2897,7 @@ if (debug) fprintf (stderr, "found: %s\n", lib_buf);
   if (debug)
     fprintf (stderr, "not found\n");
   else
-    fatal ("Library lib%s not found", name);
+    fatal ("library lib%s not found", name);
   return (NULL);
 }
 
diff --git a/gcc/cp/ChangeLog b/gcc/cp/ChangeLog
index 4d66a5db7a5..2b6914bdfd8 100644
--- a/gcc/cp/ChangeLog
+++ b/gcc/cp/ChangeLog
@@ -1,3 +1,10 @@
+2001-12-02  Neil Booth  <neil@daikokuya.demon.co.uk>
+
+	* call.c (build_java_interface_fn_ref): Similarly.
+	* except.c (is_admissible_throw_operand): Similarly.
+	* init.c (build_java_class_ref): Similarly.
+	* xref.c (open_xref_file): Similarly.
+
 2001-12-01  Neil Booth  <neil@daikokuya.demon.co.uk>
 
 	* class.c (finish_struct): Remove trailing periods from messages.
diff --git a/gcc/cp/call.c b/gcc/cp/call.c
index e4256b6973f..0a59b179de3 100644
--- a/gcc/cp/call.c
+++ b/gcc/cp/call.c
@@ -4398,7 +4398,7 @@ build_java_interface_fn_ref (fn, instance)
   if (!iface_ref || TREE_CODE (iface_ref) != VAR_DECL
       || DECL_CONTEXT (iface_ref) != iface)
     {
-      cp_error ("Could not find class$ field in java interface type `%T'", 
+      cp_error ("could not find class$ field in java interface type `%T'", 
 		iface);
       return error_mark_node;
     }
diff --git a/gcc/cp/except.c b/gcc/cp/except.c
index 003c3e6e595..079df977566 100644
--- a/gcc/cp/except.c
+++ b/gcc/cp/except.c
@@ -772,7 +772,7 @@ is_admissible_throw_operand (expr)
             conversion.  */
   else if (CLASS_TYPE_P (type) && CLASSTYPE_PURE_VIRTUALS (type))
     {
-      cp_error ("Expression '%E' of abstract class type '%T' cannot be used in throw-expression", expr, type);
+      cp_error ("expression '%E' of abstract class type '%T' cannot be used in throw-expression", expr, type);
       return false;
     }
 
diff --git a/gcc/cp/init.c b/gcc/cp/init.c
index 06c1c43f38a..b7b230d3ca2 100644
--- a/gcc/cp/init.c
+++ b/gcc/cp/init.c
@@ -2138,7 +2138,7 @@ build_java_class_ref (type)
 	  break;
 	}
     if (!field)
-      internal_error ("Can't find class$");
+      internal_error ("can't find class$");
     }
 
   class_decl = IDENTIFIER_GLOBAL_VALUE (name);
diff --git a/gcc/cp/xref.c b/gcc/cp/xref.c
index dd884db312b..5a2127be8a1 100644
--- a/gcc/cp/xref.c
+++ b/gcc/cp/xref.c
@@ -823,7 +823,7 @@ open_xref_file(file)
 
   if (xref_file == NULL)
     {
-      error("Can't create cross-reference file `%s'", xref_name);
+      error("can't create cross-reference file `%s'", xref_name);
       doing_xref = 0;
     }
 }
diff --git a/gcc/cppfiles.c b/gcc/cppfiles.c
index 65bcf62e07b..52c095f28fc 100644
--- a/gcc/cppfiles.c
+++ b/gcc/cppfiles.c
@@ -548,7 +548,7 @@ find_include_file (pfile, header, type)
 
   if (path == NULL)
     {
-      cpp_error (pfile, "No include path in which to find %s", fname);
+      cpp_error (pfile, "no include path in which to find %s", fname);
       return NO_INCLUDE_PATH;
     }
 
diff --git a/gcc/cppinit.c b/gcc/cppinit.c
index 2d873a0e6ad..9975577516c 100644
--- a/gcc/cppinit.c
+++ b/gcc/cppinit.c
@@ -1521,7 +1521,7 @@ cpp_handle_option (pfile, argc, argv)
 	    CPP_OPTION (pfile, out_fname) = arg;
 	  else
 	    {
-	      cpp_fatal (pfile, "Output filename specified twice");
+	      cpp_fatal (pfile, "output filename specified twice");
 	      return argc;
 	    }
 	  break;
diff --git a/gcc/cpplex.c b/gcc/cpplex.c
index dc17f63a995..45d28b66ab2 100644
--- a/gcc/cpplex.c
+++ b/gcc/cpplex.c
@@ -1376,7 +1376,7 @@ cpp_spell_token (pfile, token, buffer)
       break;
 
     case SPELL_NONE:
-      cpp_ice (pfile, "Unspellable token %s", TOKEN_NAME (token));
+      cpp_ice (pfile, "unspellable token %s", TOKEN_NAME (token));
       break;
     }
 
diff --git a/gcc/cppmain.c b/gcc/cppmain.c
index 20a4a6d0e6c..237f901932d 100644
--- a/gcc/cppmain.c
+++ b/gcc/cppmain.c
@@ -118,7 +118,7 @@ do_preprocessing (argc, argv)
 
   if (argi < argc)
     {
-      cpp_fatal (pfile, "Invalid option %s", argv[argi]);
+      cpp_fatal (pfile, "invalid option %s", argv[argi]);
       return;
     }
 
diff --git a/gcc/gcc.c b/gcc/gcc.c
index 7b3a85e89bd..b9ee4ef0caa 100644
--- a/gcc/gcc.c
+++ b/gcc/gcc.c
@@ -1088,7 +1088,7 @@ translate_options (argcp, argvp)
 			if (strlen (option_map[k].name) >= arglen
 			    && !strncmp (argv[i], option_map[k].name, arglen))
 			  {
-			    error ("Ambiguous abbreviation %s", argv[i]);
+			    error ("ambiguous abbreviation %s", argv[i]);
 			    break;
 			  }
 
@@ -1115,7 +1115,7 @@ translate_options (argcp, argvp)
 
 		  else if (strchr (arginfo, '*') != 0)
 		    {
-		      error ("Incomplete `%s' option", option_map[j].name);
+		      error ("incomplete `%s' option", option_map[j].name);
 		      break;
 		    }
 
@@ -1126,7 +1126,7 @@ translate_options (argcp, argvp)
 			{
 			  if (i + 1 == argc)
 			    {
-			      error ("Missing argument to `%s' option",
+			      error ("missing argument to `%s' option",
 				     option_map[j].name);
 			      break;
 			    }
@@ -1139,7 +1139,7 @@ translate_options (argcp, argvp)
 		  else if (strchr (arginfo, 'o') == 0)
 		    {
 		      if (arg != 0)
-			error ("Extraneous argument to `%s' option",
+			error ("extraneous argument to `%s' option",
 			       option_map[j].name);
 		      arg = 0;
 		    }
@@ -3886,11 +3886,11 @@ process_command (argc, argv)
 	{
 	  /* -save-temps overrides -pipe, so that temp files are produced */
 	  if (save_temps_flag)
-	    error ("Warning: -pipe ignored because -save-temps specified");
+	    error ("warning: -pipe ignored because -save-temps specified");
           /* -time overrides -pipe because we can't get correct stats when
 	     multiple children are running at once.  */
 	  else if (report_times)
-	    error ("Warning: -pipe ignored because -time specified");
+	    error ("warning: -pipe ignored because -time specified");
 	}
       else if (argv[i][0] == '-' && argv[i][1] != 0)
 	{
@@ -4921,7 +4921,7 @@ do_spec_1 (spec, inswitch, soft_matched_part)
 	      /* Catch the case where a spec string contains something like
 		 '%{foo:%*}'.  ie there is no * in the pattern on the left
 		 hand side of the :.  */
-	      error ("Spec failure: '%%*' has not been initialised by pattern match");
+	      error ("spec failure: '%%*' has not been initialised by pattern match");
 	    break;
 
 	    /* Process a string found as the value of a spec given by name.
@@ -4930,7 +4930,7 @@ do_spec_1 (spec, inswitch, soft_matched_part)
 	       %[...] modifies -D options the way %P does;
 	       %(...) uses the spec unmodified.  */
 	  case '[':
-	    error ("Warning: use of obsolete %%[ operator in specs");
+	    error ("warning: use of obsolete %%[ operator in specs");
 	  case '(':
 	    {
 	      const char *name = p;
@@ -5073,7 +5073,7 @@ do_spec_1 (spec, inswitch, soft_matched_part)
 	    break;
 
 	  default:
-	    error ("Spec failure: Unrecognised spec option '%c'", c);
+	    error ("spec failure: unrecognised spec option '%c'", c);
 	    break;
 	  }
 	break;
@@ -5183,7 +5183,7 @@ next_member:
 	      else if (*q == '}')
 		count--;
 	      else if (*q == 0)
-		fatal ("Mismatched braces in specs");
+		fatal ("mismatched braces in specs");
 	      q++;
 	    }
 	  endbody = q;
@@ -5963,7 +5963,7 @@ main (argc, argv)
     }
 
   if (n_infiles == added_libraries)
-    fatal ("No input files");
+    fatal ("no input files");
 
   /* Make a place to record the compiler output file names
      that correspond to the input files.  */
@@ -6222,7 +6222,7 @@ pfatal_pexecute (errmsg_fmt, errmsg_arg)
 void
 fancy_abort ()
 {
-  fatal ("Internal gcc abort.");
+  fatal ("internal gcc abort.");
 }
 
 /* Output an error message and exit */
diff --git a/gcc/genattr.c b/gcc/genattr.c
index 03b0b1f5668..4d53077c506 100644
--- a/gcc/genattr.c
+++ b/gcc/genattr.c
@@ -208,7 +208,7 @@ main (argc, argv)
   progname = "genattr";
 
   if (argc <= 1)
-    fatal ("No input file name");
+    fatal ("no input file name");
 
   if (init_md_reader_args (argc, argv) != SUCCESS_EXIT_CODE)
     return (FATAL_EXIT_CODE);
diff --git a/gcc/genattrtab.c b/gcc/genattrtab.c
index d2c91fcf0c1..f1f383c31e3 100644
--- a/gcc/genattrtab.c
+++ b/gcc/genattrtab.c
@@ -948,11 +948,11 @@ check_attr_test (exp, is_const, lineno)
 		  return exp;
 		}
 	      else
-		fatal ("Unknown attribute `%s' in EQ_ATTR", XSTR (exp, 0));
+		fatal ("unknown attribute `%s' in EQ_ATTR", XSTR (exp, 0));
 	    }
 
 	  if (is_const && ! attr->is_const)
-	    fatal ("Constant expression uses insn attribute `%s' in EQ_ATTR",
+	    fatal ("constant expression uses insn attribute `%s' in EQ_ATTR",
 		   XSTR (exp, 0));
 
 	  /* Copy this just to make it permanent,
@@ -969,7 +969,7 @@ check_attr_test (exp, is_const, lineno)
 	    {
 	      for (p = XSTR (exp, 1); *p; p++)
 		if (! ISDIGIT (*p))
-		  fatal ("Attribute `%s' takes only numeric values",
+		  fatal ("attribute `%s' takes only numeric values",
 			 XSTR (exp, 0));
 	    }
 	  else
@@ -980,7 +980,7 @@ check_attr_test (exp, is_const, lineno)
 		  break;
 
 	      if (av == NULL)
-		fatal ("Unknown value `%s' for `%s' attribute",
+		fatal ("unknown value `%s' for `%s' attribute",
 		       XSTR (exp, 1), XSTR (exp, 0));
 	    }
 	}
@@ -1775,7 +1775,7 @@ operate_exp (op, left, right)
 	  return newexp;
 	}
       else
-	fatal ("Badly formed attribute value");
+	fatal ("badly formed attribute value");
     }
 
   /* A hack to prevent expand_units from completely blowing up: ORX_OP does
@@ -1827,7 +1827,7 @@ operate_exp (op, left, right)
     }
 
   else
-    fatal ("Badly formed attribute value");
+    fatal ("badly formed attribute value");
   /* NOTREACHED */
   return NULL;
 }
@@ -3305,7 +3305,7 @@ simplify_test_exp (exp, insn_code, insn_index)
 	{
 	  i = compute_alternative_mask (exp, AND);
 	  if (i & ~insn_alternatives[insn_code])
-	    fatal ("Invalid alternative specified for pattern number %d",
+	    fatal ("invalid alternative specified for pattern number %d",
 		   insn_index);
 
 	  /* If all alternatives are excluded, this is false.  */
@@ -3389,7 +3389,7 @@ simplify_test_exp (exp, insn_code, insn_index)
 	{
 	  i = compute_alternative_mask (exp, IOR);
 	  if (i & ~insn_alternatives[insn_code])
-	    fatal ("Invalid alternative specified for pattern number %d",
+	    fatal ("invalid alternative specified for pattern number %d",
 		   insn_index);
 
 	  /* If all alternatives are included, this is true.  */
@@ -4745,7 +4745,7 @@ write_test_expr (exp, flags)
       if (XSTR (exp, 1) == NULL || *XSTR (exp, 1) == '\0')
 	{
 	  if (GET_MODE (exp) == VOIDmode)
-	    fatal ("Null MATCH_OPERAND specified as test");
+	    fatal ("null MATCH_OPERAND specified as test");
 	  else
 	    printf ("GET_MODE (operands[%d]) == %smode",
 		    XINT (exp, 0), GET_MODE_NAME (GET_MODE (exp)));
@@ -6065,7 +6065,7 @@ main (argc, argv)
   progname = "genattrtab";
 
   if (argc <= 1)
-    fatal ("No input file name");
+    fatal ("no input file name");
 
   if (init_md_reader_args (argc, argv) != SUCCESS_EXIT_CODE)
     return (FATAL_EXIT_CODE);
diff --git a/gcc/gencodes.c b/gcc/gencodes.c
index d5d5c4bfda9..0611eecaf03 100644
--- a/gcc/gencodes.c
+++ b/gcc/gencodes.c
@@ -54,7 +54,7 @@ main (argc, argv)
   progname = "gencodes";
 
   if (argc <= 1)
-    fatal ("No input file name");
+    fatal ("no input file name");
 
   if (init_md_reader_args (argc, argv) != SUCCESS_EXIT_CODE)
     return (FATAL_EXIT_CODE);
diff --git a/gcc/genconfig.c b/gcc/genconfig.c
index 2dc04595538..d7709b0eb4a 100644
--- a/gcc/genconfig.c
+++ b/gcc/genconfig.c
@@ -275,7 +275,7 @@ main (argc, argv)
   progname = "genconfig";
 
   if (argc <= 1)
-    fatal ("No input file name");
+    fatal ("no input file name");
 
   if (init_md_reader_args (argc, argv) != SUCCESS_EXIT_CODE)
     return (FATAL_EXIT_CODE);
diff --git a/gcc/genconstants.c b/gcc/genconstants.c
index 9043caea569..9208f0c0009 100644
--- a/gcc/genconstants.c
+++ b/gcc/genconstants.c
@@ -61,7 +61,7 @@ main (argc, argv)
   progname = "genconstants";
 
   if (argc <= 1)
-    fatal ("No input file name");
+    fatal ("no input file name");
 
   if (init_md_reader (argv[1]) != SUCCESS_EXIT_CODE)
     return (FATAL_EXIT_CODE);
diff --git a/gcc/genemit.c b/gcc/genemit.c
index 605e84b536b..86c852c2f51 100644
--- a/gcc/genemit.c
+++ b/gcc/genemit.c
@@ -787,7 +787,7 @@ main (argc, argv)
   progname = "genemit";
 
   if (argc <= 1)
-    fatal ("No input file name");
+    fatal ("no input file name");
 
   if (init_md_reader_args (argc, argv) != SUCCESS_EXIT_CODE)
     return (FATAL_EXIT_CODE);
diff --git a/gcc/genextract.c b/gcc/genextract.c
index 79e87552e93..72e3e56e449 100644
--- a/gcc/genextract.c
+++ b/gcc/genextract.c
@@ -360,7 +360,7 @@ main (argc, argv)
   progname = "genextract";
 
   if (argc <= 1)
-    fatal ("No input file name");
+    fatal ("no input file name");
 
   if (init_md_reader_args (argc, argv) != SUCCESS_EXIT_CODE)
     return (FATAL_EXIT_CODE);
diff --git a/gcc/genflags.c b/gcc/genflags.c
index 1942ab9cfcc..031155f14de 100644
--- a/gcc/genflags.c
+++ b/gcc/genflags.c
@@ -228,7 +228,7 @@ main (argc, argv)
   obstack_init (&obstack);
 
   if (argc <= 1)
-    fatal ("No input file name");
+    fatal ("no input file name");
 
   if (init_md_reader_args (argc, argv) != SUCCESS_EXIT_CODE)
     return (FATAL_EXIT_CODE);
diff --git a/gcc/genopinit.c b/gcc/genopinit.c
index 760b8353d11..384a06601d8 100644
--- a/gcc/genopinit.c
+++ b/gcc/genopinit.c
@@ -317,7 +317,7 @@ main (argc, argv)
   progname = "genopinit";
 
   if (argc <= 1)
-    fatal ("No input file name");
+    fatal ("no input file name");
 
   if (init_md_reader_args (argc, argv) != SUCCESS_EXIT_CODE)
     return (FATAL_EXIT_CODE);
diff --git a/gcc/genoutput.c b/gcc/genoutput.c
index 53322776c1f..b11e08331ed 100644
--- a/gcc/genoutput.c
+++ b/gcc/genoutput.c
@@ -713,7 +713,7 @@ process_template (d, template)
       if (i != d->n_alternatives)
 	{
 	  message_with_line (d->lineno,
-			     "Wrong number of alternatives in the output template");
+			     "wrong number of alternatives in the output template");
 	  have_error = 1;
 	}
 
@@ -951,7 +951,7 @@ main (argc, argv)
   progname = "genoutput";
 
   if (argc <= 1)
-    fatal ("No input file name");
+    fatal ("no input file name");
 
   if (init_md_reader_args (argc, argv) != SUCCESS_EXIT_CODE)
     return (FATAL_EXIT_CODE);
diff --git a/gcc/genpeep.c b/gcc/genpeep.c
index 2d81ada942a..036f68812d1 100644
--- a/gcc/genpeep.c
+++ b/gcc/genpeep.c
@@ -383,7 +383,7 @@ main (argc, argv)
   progname = "genpeep";
 
   if (argc <= 1)
-    fatal ("No input file name");
+    fatal ("no input file name");
 
   if (init_md_reader_args (argc, argv) != SUCCESS_EXIT_CODE)
     return (FATAL_EXIT_CODE);
diff --git a/gcc/genrecog.c b/gcc/genrecog.c
index e721e41e100..71e9b842145 100644
--- a/gcc/genrecog.c
+++ b/gcc/genrecog.c
@@ -2687,7 +2687,7 @@ main (argc, argv)
   memset (&peephole2_tree, 0, sizeof peephole2_tree);
 
   if (argc <= 1)
-    fatal ("No input file name");
+    fatal ("no input file name");
 
   if (init_md_reader_args (argc, argv) != SUCCESS_EXIT_CODE)
     return (FATAL_EXIT_CODE);
diff --git a/gcc/gensupport.c b/gcc/gensupport.c
index ae42a41f2b5..415df01775a 100644
--- a/gcc/gensupport.c
+++ b/gcc/gensupport.c
@@ -485,7 +485,7 @@ is_predicable (elem)
     return 0;
 
   message_with_line (elem->lineno,
-		     "Unknown value `%s' for `predicable' attribute",
+		     "unknown value `%s' for `predicable' attribute",
 		     value);
   errors = 1;
   return 0;
@@ -508,7 +508,7 @@ identify_predicable_attribute ()
       goto found;
 
   message_with_line (define_cond_exec_queue->lineno,
-		     "Attribute `predicable' not defined");
+		     "attribute `predicable' not defined");
   errors = 1;
   return;
 
@@ -522,7 +522,7 @@ identify_predicable_attribute ()
   if (p_true == NULL || strchr (++p_true, ',') != NULL)
     {
       message_with_line (elem->lineno,
-			 "Attribute `predicable' is not a boolean");
+			 "attribute `predicable' is not a boolean");
       errors = 1;
       return;
     }
@@ -539,13 +539,13 @@ identify_predicable_attribute ()
 
     case CONST:
       message_with_line (elem->lineno,
-			 "Attribute `predicable' cannot be const");
+			 "attribute `predicable' cannot be const");
       errors = 1;
       return;
 
     default:
       message_with_line (elem->lineno,
-			 "Attribute `predicable' must have a constant default");
+			 "attribute `predicable' must have a constant default");
       errors = 1;
       return;
     }
@@ -557,7 +557,7 @@ identify_predicable_attribute ()
   else
     {
       message_with_line (elem->lineno,
-			 "Unknown value `%s' for `predicable' attribute",
+			 "unknown value `%s' for `predicable' attribute",
 			 value);
       errors = 1;
     }
@@ -658,7 +658,7 @@ alter_predicate_for_insn (pattern, alt, max_op, lineno)
 	if (n_alternatives (c) != 1)
 	  {
 	    message_with_line (lineno,
-			       "Too many alternatives for operand %d",
+			       "too many alternatives for operand %d",
 			       XINT (pattern, 0));
 	    errors = 1;
 	    return NULL;
@@ -989,7 +989,7 @@ init_md_reader_args (argc, argv)
 		if (argv[i][1] == 'I' && argv[i][2] != 0)
 		  dirtmp->fname = argv[i] + 2;
 		else if (i + 1 == argc)
-		  fatal ("Directory name missing after -I option");
+		  fatal ("directory name missing after -I option");
 		else
 		  dirtmp->fname = argv[++i];
 		if (strlen (dirtmp->fname) > max_include_len)
@@ -997,7 +997,7 @@ init_md_reader_args (argc, argv)
 	      }
 	      break;
 	    default:
-	      fatal ("Invalid option `%s'", argv[i]);
+	      fatal ("invalid option `%s'", argv[i]);
 
 	    }
 	}
diff --git a/gcc/ggc-page.c b/gcc/ggc-page.c
index 36b4a319b21..b941f54aed3 100644
--- a/gcc/ggc-page.c
+++ b/gcc/ggc-page.c
@@ -518,7 +518,7 @@ alloc_anon (pref, size)
 
   if (page == (char *) MAP_FAILED)
     {
-      perror ("Virtual memory exhausted");
+      perror ("virtual memory exhausted");
       exit (FATAL_EXIT_CODE);
     }
 
diff --git a/gcc/mips-tfile.c b/gcc/mips-tfile.c
index 70f580a76b7..167742a6052 100644
--- a/gcc/mips-tfile.c
+++ b/gcc/mips-tfile.c
@@ -1820,7 +1820,7 @@ add_string (vp, hash_tbl, start, end_p1, ret_hash)
   symint_t hi;
 
   if (len >= (Ptrdiff_t) PAGE_USIZE)
-    fatal ("String too big (%ld bytes)", (long) len);
+    fatal ("string too big (%ld bytes)", (long) len);
 
   hash_ptr = hash_string (start, len, hash_tbl, &hi);
   if (hash_ptr == (shash_t *) 0)
@@ -2457,7 +2457,7 @@ add_procedure (func_start, func_end_p1)
     }
 
   if (cur_oproc_ptr == (PDR *) 0)
-    error ("Did not find a PDR block for %.*s",
+    error ("did not find a PDR block for %.*s",
 	   (int) (func_end_p1 - func_start), func_start);
 
   /* Determine the start of symbols.  */
@@ -2526,7 +2526,7 @@ add_file (file_start, file_end_p1)
 		  (shash_t **) 0);
 
       if (file_end_p1 - file_start > (long) PAGE_USIZE-2)
-	fatal ("Filename goes over one page boundary");
+	fatal ("filename goes over one page boundary");
 
       /* Push the start of the filename. We assume that the filename
          will be stored at string offset 1.  */
@@ -2713,7 +2713,7 @@ read_line ()
 	}
 
       else if (ch == '\0')
-	error ("Null character found in input");
+	error ("null character found in input");
 
       else if (!comment_p)
 	{
@@ -2775,14 +2775,14 @@ parse_begin (start)
 
   if (hash_ptr == (shash_t *) 0)
     {
-      error ("Label %.*s not found for #.begin",
+      error ("label %.*s not found for #.begin",
 	     (int) (end_p1 - start), start);
       return;
     }
 
   if (cur_oproc_begin == (SYMR *) 0)
     {
-      error ("Procedure table %.*s not found for #.begin",
+      error ("procedure table %.*s not found for #.begin",
 	     (int) (end_p1 - start), start);
       return;
     }
@@ -2827,13 +2827,13 @@ parse_bend (start)
 
   if (hash_ptr == (shash_t *) 0)
     {
-      error ("Label %.*s not found for #.bend", (int) (end_p1 - start), start);
+      error ("label %.*s not found for #.bend", (int) (end_p1 - start), start);
       return;
     }
 
   if (cur_oproc_begin == (SYMR *) 0)
     {
-      error ("Procedure table %.*s not found for #.bend",
+      error ("procedure table %.*s not found for #.bend",
 	     (int) (end_p1 - start), start);
       return;
     }
@@ -3289,7 +3289,7 @@ parse_def (name_start)
 	{
 	  if (tag_start == (char *) 0)
 	    {
-	      error ("No tag specified for %.*s",
+	      error ("no tag specified for %.*s",
 		     (int) (name_end_p1 - name_start),
 		     name_start);
 	      return;
@@ -3480,7 +3480,7 @@ parse_end (start)
     value = cur_oproc_end->value;
 
   else
-    error ("Cannot find .end block for %.*s",
+    error ("cannot find .end block for %.*s",
 	   (int) (end_func_p1 - start_func), start_func);
 
   (void) add_local_symbol (start_func, end_func_p1,
@@ -3544,13 +3544,13 @@ parse_file (start)
       || (start_name = strchr (p, '"')) == (char *) 0
       || (end_name_p1 = strrchr (++start_name, '"')) == (char *) 0)
     {
-      error ("Invalid .file directive");
+      error ("invalid .file directive");
       return;
     }
 
   if (cur_proc_ptr != (PDR *) 0)
     {
-      error ("No way to handle .file within .ent/.end section");
+      error ("no way to handle .file within .ent/.end section");
       return;
     }
 
@@ -3625,7 +3625,7 @@ parse_stabs_common (string_start, string_end, rest)
   /* Read code from stabs.  */
   if (!ISDIGIT (*rest))
     {
-      error ("Invalid .stabs/.stabn directive, code is non-numeric");
+      error ("invalid .stabs/.stabn directive, code is non-numeric");
       return;
     }
 
@@ -3645,7 +3645,7 @@ parse_stabs_common (string_start, string_end, rest)
       /* Skip ,0, */
       if (p[0] != ',' || p[1] != '0' || p[2] != ',' || !ISDIGIT (p[3]))
 	{
-	  error ("Invalid line number .stabs/.stabn directive");
+	  error ("invalid line number .stabs/.stabn directive");
 	  return;
 	}
 
@@ -3653,14 +3653,14 @@ parse_stabs_common (string_start, string_end, rest)
       ch = *++p;
       if (p[-1] != ',' || ISDIGIT (ch) || !IS_ASM_IDENT (ch))
 	{
-	  error ("Invalid line number .stabs/.stabn directive");
+	  error ("invalid line number .stabs/.stabn directive");
 	  return;
 	}
 
       dummy_symr.index = code;
       if (dummy_symr.index != code)
 	{
-	  error ("Line number (%lu) for .stabs/.stabn directive cannot fit in index field (20 bits)",
+	  error ("line number (%lu) for .stabs/.stabn directive cannot fit in index field (20 bits)",
 		 code);
 
 	  return;
@@ -3674,13 +3674,13 @@ parse_stabs_common (string_start, string_end, rest)
       if (shash_ptr == (shash_t *) 0
 	  || (sym_ptr = shash_ptr->sym_ptr) == (SYMR *) 0)
 	{
-	  error ("Invalid .stabs/.stabn directive, value not found");
+	  error ("invalid .stabs/.stabn directive, value not found");
 	  return;
 	}
 
       if ((st_t) sym_ptr->st != st_Label)
 	{
-	  error ("Invalid line number .stabs/.stabn directive");
+	  error ("invalid line number .stabs/.stabn directive");
 	  return;
 	}
 
@@ -3705,7 +3705,7 @@ parse_stabs_common (string_start, string_end, rest)
       if (!IS_ASM_IDENT (ch) && ch != '-')
 	{
 	failure:
-	  error ("Invalid .stabs/.stabn directive, bad character");
+	  error ("invalid .stabs/.stabn directive, bad character");
 	  return;
 	}
 
@@ -3716,13 +3716,13 @@ parse_stabs_common (string_start, string_end, rest)
 	  value = strtol (p, &p, 0);
 	  if (*p != '\n')
 	    {
-	      error ("Invalid .stabs/.stabn directive, stuff after numeric value");
+	      error ("invalid .stabs/.stabn directive, stuff after numeric value");
 	      return;
 	    }
 	}
       else if (!IS_ASM_IDENT (ch))
 	{
-	  error ("Invalid .stabs/.stabn directive, bad character");
+	  error ("invalid .stabs/.stabn directive, bad character");
 	  return;
 	}
       else
@@ -3754,7 +3754,7 @@ parse_stabs_common (string_start, string_end, rest)
 	      if (shash_ptr == (shash_t *) 0
 		  || shash_ptr->esym_ptr == (EXTR *) 0)
 		{
-		  error ("Invalid .stabs/.stabn directive, value not found");
+		  error ("invalid .stabs/.stabn directive, value not found");
 		  return;
 		}
 	      else
@@ -3780,7 +3780,7 @@ parse_stabs_common (string_start, string_end, rest)
 	      if (((!ISDIGIT (*end_p1)) && (*end_p1 != '-'))
 		  || ((ch != '+') && (ch != '-')))
 		{
-		  error ("Invalid .stabs/.stabn directive, badly formed value");
+		  error ("invalid .stabs/.stabn directive, badly formed value");
 		  return;
 		}
 	      if (ch == '+')
@@ -3790,7 +3790,7 @@ parse_stabs_common (string_start, string_end, rest)
 
 	      if (*p != '\n')
 		{
-		  error ("Invalid .stabs/.stabn directive, stuff after numeric value");
+		  error ("invalid .stabs/.stabn directive, stuff after numeric value");
 		  return;
 		}
 	    }
@@ -3812,7 +3812,7 @@ parse_stabs (start)
 
   if (*start != '"' || end == (const char *) 0 || end[1] != ',')
     {
-      error ("Invalid .stabs directive, no string");
+      error ("invalid .stabs directive, no string");
       return;
     }
 
@@ -4115,7 +4115,7 @@ write_varray (vp, offset, str)
 	pfatal_with_name (object_name);
 
       else if (sys_write != num_write)
-	fatal ("Wrote %d bytes to %s, system returned %d",
+	fatal ("wrote %d bytes to %s, system returned %d",
 	       num_write,
 	       object_name,
 	       sys_write);
@@ -4151,7 +4151,7 @@ write_object ()
     pfatal_with_name (object_name);
 
   else if (sys_write != sizeof (symbolic_header))
-    fatal ("Wrote %d bytes to %s, system returned %d",
+    fatal ("wrote %d bytes to %s, system returned %d",
 	   (int) sizeof (symbolic_header),
 	   object_name,
 	   sys_write);
@@ -4185,7 +4185,7 @@ write_object ()
 	pfatal_with_name (object_name);
 
       else if (sys_write != symbolic_header.cbLine)
-	fatal ("Wrote %ld bytes to %s, system returned %ld",
+	fatal ("wrote %ld bytes to %s, system returned %ld",
 	       (long) symbolic_header.cbLine,
 	       object_name,
 	       sys_write);
@@ -4220,7 +4220,7 @@ write_object ()
 	pfatal_with_name (object_name);
 
       else if (sys_write != num_write)
-	fatal ("Wrote %ld bytes to %s, system returned %ld",
+	fatal ("wrote %ld bytes to %s, system returned %ld",
 	       num_write,
 	       object_name,
 	       sys_write);
@@ -4312,7 +4312,7 @@ write_object ()
 	    pfatal_with_name (object_name);
 
 	  else if (sys_write != sizeof (FDR))
-	    fatal ("Wrote %d bytes to %s, system returned %d",
+	    fatal ("wrote %d bytes to %s, system returned %d",
 		   (int) sizeof (FDR),
 		   object_name,
 		   sys_write);
@@ -4348,7 +4348,7 @@ write_object ()
 	pfatal_with_name (object_name);
 
       else if (sys_write != (long)num_write)
-	fatal ("Wrote %lu bytes to %s, system returned %ld",
+	fatal ("wrote %lu bytes to %s, system returned %ld",
 	       num_write,
 	       object_name,
 	       sys_write);
@@ -4404,7 +4404,7 @@ read_seek (size, offset, str)
 	    pfatal_with_name (obj_in_name);
 
 	  if ((symint_t)sys_read != difference)
-	    fatal ("Wanted to read %lu bytes from %s, system returned %ld",
+	    fatal ("wanted to read %lu bytes from %s, system returned %ld",
 		   (unsigned long) size,
 		   obj_in_name,
 		   sys_read);
@@ -4418,7 +4418,7 @@ read_seek (size, offset, str)
     pfatal_with_name (obj_in_name);
 
   if (sys_read != (long) size)
-    fatal ("Wanted to read %lu bytes from %s, system returned %ld",
+    fatal ("wanted to read %lu bytes from %s, system returned %ld",
 	   (unsigned long) size,
 	   obj_in_name,
 	   sys_read);
@@ -4468,7 +4468,7 @@ copy_object ()
     return;			/* create a .T file sans file header */
 
   else if (sys_read < (int) sizeof (struct filehdr))
-    fatal ("Wanted to read %d bytes from %s, system returned %d",
+    fatal ("wanted to read %d bytes from %s, system returned %d",
 	   (int) sizeof (struct filehdr),
 	   obj_in_name,
 	   sys_read);
@@ -4492,7 +4492,7 @@ copy_object ()
     pfatal_with_name (object_name);
 
   else if (sys_read < (int) sizeof (struct filehdr))
-    fatal ("Wanted to read %d bytes from %s, system returned %d",
+    fatal ("wanted to read %d bytes from %s, system returned %d",
 	   (int) sizeof (struct filehdr),
 	   obj_in_name,
 	   sys_read);
@@ -4570,7 +4570,7 @@ copy_object ()
 
   /* Abort if the symbol table is not last.  */
   if (max_file_offset != stat_buf.st_size)
-    fatal ("Symbol table is not last (symbol table ends at %ld, .o ends at %ld",
+    fatal ("symbol table is not last (symbol table ends at %ld, .o ends at %ld",
 	   max_file_offset,
 	   (long) stat_buf.st_size);
 
@@ -4786,7 +4786,7 @@ copy_object ()
 	pfatal_with_name (obj_in_name);
 
       else if (sys_read != num_write)
-	fatal ("Wanted to read %d bytes from %s, system returned %d",
+	fatal ("wanted to read %d bytes from %s, system returned %d",
 	       num_write,
 	       obj_in_name,
 	       sys_read);
@@ -4796,7 +4796,7 @@ copy_object ()
 	pfatal_with_name (object_name);
 
       else if (sys_write != num_write)
-	fatal ("Wrote %d bytes to %s, system returned %d",
+	fatal ("wrote %d bytes to %s, system returned %d",
 	       num_write,
 	       object_name,
 	       sys_write);
@@ -4827,12 +4827,12 @@ main (argc, argv)
 
 #if !defined(__SABER__) && !defined(lint)
   if (sizeof (efdr_t) > PAGE_USIZE)
-    fatal ("Efdr_t has a sizeof %d bytes, when it should be less than %d",
+    fatal ("efdr_t has a sizeof %d bytes, when it should be less than %d",
 	   (int) sizeof (efdr_t),
 	   (int) PAGE_USIZE);
 
   if (sizeof (page_t) != PAGE_USIZE)
-    fatal ("Page_t has a sizeof %d bytes, when it should be %d",
+    fatal ("page_t has a sizeof %d bytes, when it should be %d",
 	   (int) sizeof (page_t),
 	   (int) PAGE_USIZE);
 
@@ -5608,7 +5608,7 @@ error VPARAMS ((const char *format, ...))
 void
 fancy_abort ()
 {
-  fatal ("Internal abort");
+  fatal ("internal abort");
 }
 
 
diff --git a/gcc/objc/objc-act.c b/gcc/objc/objc-act.c
index 2e02b7c9af1..93262e00aba 100644
--- a/gcc/objc/objc-act.c
+++ b/gcc/objc/objc-act.c
@@ -58,7 +58,6 @@ Boston, MA 02111-1307, USA.  */
 #include "cpplib.h"
 #include "debug.h"
 #include "target.h"
-#include "varray.h"
 #include "langhooks.h"
 #include "langhooks-def.h"
 
@@ -482,8 +481,6 @@ static int print_struct_values = 0;
 /* Each front end provides its own.  */
 const struct lang_hooks lang_hooks = LANG_HOOKS_INITIALIZER;
 
-static varray_type deferred_fns;
-
 /* Post-switch processing.  */
 static void
 objc_post_options ()
@@ -610,36 +607,13 @@ objc_init (filename)
 
   objc_act_parse_init ();
 
-  VARRAY_TREE_INIT (deferred_fns, 32, "deferred_fns");
-  ggc_add_tree_varray_root (&deferred_fns, 1);
-
   return filename;
 }
 
-/* Register a function tree, so that its optimization and conversion
-   to RTL is only done at the end of the compilation.  */
-
-int
-defer_fn (fn)
-     tree fn;
-{
-  VARRAY_PUSH_TREE (deferred_fns, fn);
-
-  return 1;
-}
-
 void
 finish_file ()
 {
-  int i;
-
-  for (i = 0; i < VARRAY_ACTIVE_SIZE (deferred_fns); i++)
-    /* Don't output the same function twice.  We may run into such
-       situations when an extern inline function is later given a
-       non-extern-inline definition.  */
-    if (! TREE_ASM_WRITTEN (VARRAY_TREE (deferred_fns, i)))
-      c_expand_deferred_function (VARRAY_TREE (deferred_fns, i));
-  VARRAY_FREE (deferred_fns);
+  c_objc_common_finish_file ();
 
   finish_objc ();		/* Objective-C finalization */
 
@@ -1010,12 +984,12 @@ get_object_reference (protocols)
     {
       type = TREE_TYPE (type_decl);
       if (TYPE_MAIN_VARIANT (type) != id_type)
-	warning ("Unexpected type for `id' (%s)",
+	warning ("unexpected type for `id' (%s)",
 		 gen_declaration (type, errbuf));
     }
   else
     {
-      error ("Undefined type `id', please import <objc/objc.h>");
+      error ("undefined type `id', please import <objc/objc.h>");
       return error_mark_node;
     }
 
@@ -1089,7 +1063,7 @@ lookup_and_install_protocols (protocols)
 
       if (!p)
 	{
-	  error ("Cannot find protocol declaration for `%s'",
+	  error ("cannot find protocol declaration for `%s'",
 		 IDENTIFIER_POINTER (ident));
 	  if (prev)
 	    TREE_CHAIN (prev) = TREE_CHAIN (proto);
@@ -1322,7 +1296,7 @@ build_objc_string_object (strings)
 
   if (lookup_interface (constant_string_id) == NULL_TREE)
     {
-      error ("Cannot find interface declaration for `%s'",
+      error ("cannot find interface declaration for `%s'",
 	     IDENTIFIER_POINTER (constant_string_id));
       return error_mark_node;
     }
@@ -1342,7 +1316,7 @@ build_objc_string_object (strings)
       setup_string_decl ();
       if (string_class_decl == NULL_TREE)
 	{
-	  error ("Cannot find reference tag for class `%s'",
+	  error ("cannot find reference tag for class `%s'",
 		 IDENTIFIER_POINTER (constant_string_id));
 	  return error_mark_node;
 	}
@@ -2330,9 +2304,9 @@ objc_declare_alias (alias_ident, class_ident)
      tree class_ident;
 {
   if (is_class_name (class_ident) != class_ident)
-    warning ("Cannot find class `%s'", IDENTIFIER_POINTER (class_ident));
+    warning ("cannot find class `%s'", IDENTIFIER_POINTER (class_ident));
   else if (is_class_name (alias_ident))
-    warning ("Class `%s' already exists", IDENTIFIER_POINTER (alias_ident));
+    warning ("class `%s' already exists", IDENTIFIER_POINTER (alias_ident));
   else
     alias_chain = tree_cons (class_ident, alias_ident, alias_chain);
 }
@@ -2456,14 +2430,14 @@ build_ivar_chain (interface, copy)
       if (!super_interface)
         {
 	  /* fatal did not work with 2 args...should fix */
-	  error ("Cannot find interface declaration for `%s', superclass of `%s'",
+	  error ("cannot find interface declaration for `%s', superclass of `%s'",
 		 IDENTIFIER_POINTER (super_name),
 		 IDENTIFIER_POINTER (my_name));
 	  exit (FATAL_EXIT_CODE);
         }
 
       if (super_interface == interface)
-	fatal_error ("Circular inheritance in interface declaration for `%s'",
+	fatal_error ("circular inheritance in interface declaration for `%s'",
 		     IDENTIFIER_POINTER (super_name));
 
       interface = super_interface;
@@ -5020,7 +4994,7 @@ finish_message_expr (receiver, sel_name, method_params)
 
       if (!method_prototype)
 	{
-	  warning ("cannot find class (factory) method.");
+	  warning ("cannot find class (factory) method");
 	  warning ("return type for `%s' defaults to id",
 		   IDENTIFIER_POINTER (sel_name));
 	}
@@ -5038,7 +5012,7 @@ finish_message_expr (receiver, sel_name, method_params)
 	{
           hash hsh;
 
-	  warning ("method `%s' not implemented by protocol.",
+	  warning ("method `%s' not implemented by protocol",
 		   IDENTIFIER_POINTER (sel_name));
 
           /* Try and find the method signature in the global pools.  */
@@ -5064,7 +5038,7 @@ finish_message_expr (receiver, sel_name, method_params)
       method_prototype = check_duplicates (hsh);
       if (!method_prototype)
 	{
-	  warning ("cannot find method.");
+	  warning ("cannot find method");
 	  warning ("return type for `%s' defaults to id",
 		   IDENTIFIER_POINTER (sel_name));
 	}
@@ -5238,7 +5212,7 @@ build_protocol_expr (protoname)
 
   if (!p)
     {
-      error ("Cannot find protocol declaration for `%s'",
+      error ("cannot find protocol declaration for `%s'",
 	     IDENTIFIER_POINTER (protoname));
       return error_mark_node;
     }
@@ -5544,13 +5518,13 @@ add_class_method (class, method)
   else
     {
       if (TREE_CODE (class) == CLASS_IMPLEMENTATION_TYPE)
-	error ("duplicate definition of class method `%s'.",
+	error ("duplicate definition of class method `%s'",
 	       IDENTIFIER_POINTER (METHOD_SEL_NAME (mth)));
       else
         {
 	  /* Check types; if different, complain.  */
 	  if (!comp_proto_with_proto (method, mth))
-	    error ("duplicate declaration of class method `%s'.",
+	    error ("duplicate declaration of class method `%s'",
 		   IDENTIFIER_POINTER (METHOD_SEL_NAME (mth)));
         }
     }
@@ -5586,13 +5560,13 @@ add_instance_method (class, method)
   else
     {
       if (TREE_CODE (class) == CLASS_IMPLEMENTATION_TYPE)
-	error ("duplicate definition of instance method `%s'.",
+	error ("duplicate definition of instance method `%s'",
 	       IDENTIFIER_POINTER (METHOD_SEL_NAME (mth)));
       else
         {
 	  /* Check types; if different, complain.  */
 	  if (!comp_proto_with_proto (method, mth))
-	    error ("duplicate declaration of instance method `%s'.",
+	    error ("duplicate declaration of instance method `%s'",
 		   IDENTIFIER_POINTER (METHOD_SEL_NAME (mth)));
         }
     }
@@ -5743,7 +5717,7 @@ is_public (expr, identifier)
 	{
 	  if (!lookup_interface (TYPE_NAME (basetype)))
 	    {
-	      error ("Cannot find interface declaration for `%s'",
+	      error ("cannot find interface declaration for `%s'",
 		     IDENTIFIER_POINTER (TYPE_NAME (basetype)));
 	      return 0;
 	    }
@@ -6072,7 +6046,7 @@ start_class (code, class_name, super_name, protocol_list)
 
       if (!(implementation_template = lookup_interface (class_name)))
         {
-	  warning ("Cannot find interface declaration for `%s'",
+	  warning ("cannot find interface declaration for `%s'",
 		   IDENTIFIER_POINTER (class_name));
 	  add_class (implementation_template = objc_implementation_context);
         }
@@ -6121,7 +6095,7 @@ start_class (code, class_name, super_name, protocol_list)
 
       if (!(class_category_is_assoc_with = lookup_interface (class_name)))
 	{
-	  error ("Cannot find interface declaration for `%s'",
+	  error ("cannot find interface declaration for `%s'",
 		 IDENTIFIER_POINTER (class_name));
 	  exit (FATAL_EXIT_CODE);
 	}
@@ -6157,7 +6131,7 @@ start_class (code, class_name, super_name, protocol_list)
 
       if (!(implementation_template = lookup_interface (class_name)))
         {
-	  error ("Cannot find interface declaration for `%s'",
+	  error ("cannot find interface declaration for `%s'",
 		 IDENTIFIER_POINTER (class_name));
 	  exit (FATAL_EXIT_CODE);
         }
diff --git a/gcc/profile.c b/gcc/profile.c
index caad5df588a..0c4acdfc184 100644
--- a/gcc/profile.c
+++ b/gcc/profile.c
@@ -426,7 +426,7 @@ compute_branch_probabilities ()
 		e->probability = (e->count * REG_BR_PROB_BASE + total / 2) / total;
 		if (e->probability < 0 || e->probability > REG_BR_PROB_BASE)
 		  {
-		    error ("Corrupted profile info: prob for %d-%d thought to be %d",
+		    error ("corrupted profile info: prob for %d-%d thought to be %d",
 			   e->src->index, e->dest->index, e->probability);
 		    e->probability = REG_BR_PROB_BASE / 2;
 		  }
diff --git a/gcc/reg-stack.c b/gcc/reg-stack.c
index 1ebb0690a76..4f28a2ac6fc 100644
--- a/gcc/reg-stack.c
+++ b/gcc/reg-stack.c
@@ -674,7 +674,7 @@ check_asm_stack_operands (insn)
       {
 	if (reg_class_size[(int) recog_op_alt[i][alt].class] != 1)
 	  {
-	    error_for_asm (insn, "Output constraint %d must specify a single register", i);
+	    error_for_asm (insn, "output constraint %d must specify a single register", i);
 	    malformed_asm = 1;
 	  }
         else
@@ -684,7 +684,7 @@ check_asm_stack_operands (insn)
 	    for (j = 0; j < n_clobbers; j++)
 	      if (REGNO (recog_data.operand[i]) == REGNO (clobber_reg[j]))
 		{
-		  error_for_asm (insn, "Output constraint %d cannot be specified together with \"%s\" clobber",
+		  error_for_asm (insn, "output constraint %d cannot be specified together with \"%s\" clobber",
 				 i, reg_names [REGNO (clobber_reg[j])]);
 		  malformed_asm = 1;
 		  break;
@@ -707,7 +707,7 @@ check_asm_stack_operands (insn)
 
   if (i != LAST_STACK_REG + 1)
     {
-      error_for_asm (insn, "Output regs must be grouped at top of stack");
+      error_for_asm (insn, "output regs must be grouped at top of stack");
       malformed_asm = 1;
     }
 
@@ -744,7 +744,7 @@ check_asm_stack_operands (insn)
   if (i != LAST_STACK_REG + 1)
     {
       error_for_asm (insn,
-		     "Implicitly popped regs must be grouped at top of stack");
+		     "implicitly popped regs must be grouped at top of stack");
       malformed_asm = 1;
     }
 
@@ -763,7 +763,7 @@ check_asm_stack_operands (insn)
 	  if (operands_match_p (recog_data.operand[j], recog_data.operand[i]))
 	    {
 	      error_for_asm (insn,
-			     "Output operand %d must use `&' constraint", j);
+			     "output operand %d must use `&' constraint", j);
 	      malformed_asm = 1;
 	    }
       }
diff --git a/gcc/reload.c b/gcc/reload.c
index ad884ae4c78..0b331d4533b 100644
--- a/gcc/reload.c
+++ b/gcc/reload.c
@@ -3540,7 +3540,7 @@ find_reloads (insn, replace, ind_levels, live_known, reload_reg_p)
     {
       /* No alternative works with reloads??  */
       if (insn_code_number >= 0)
-	fatal_insn ("Unable to generate reloads for:", insn);
+	fatal_insn ("unable to generate reloads for:", insn);
       error_for_asm (insn, "inconsistent operand constraints in an `asm'");
       /* Avoid further trouble with this insn.  */
       PATTERN (insn) = gen_rtx_USE (VOIDmode, const0_rtx);
diff --git a/gcc/reload1.c b/gcc/reload1.c
index a14e963b759..fa17d53c80f 100644
--- a/gcc/reload1.c
+++ b/gcc/reload1.c
@@ -1888,13 +1888,13 @@ spill_failure (insn, class)
 {
   static const char *const reg_class_names[] = REG_CLASS_NAMES;
   if (asm_noperands (PATTERN (insn)) >= 0)
-    error_for_asm (insn, "Can't find a register in class `%s' while reloading `asm'",
+    error_for_asm (insn, "can't find a register in class `%s' while reloading `asm'",
 		   reg_class_names[class]);
   else
     {
-      error ("Unable to find a register to spill in class `%s'",
+      error ("unable to find a register to spill in class `%s'",
 	     reg_class_names[class]);
-      fatal_insn ("This is the insn:", insn);
+      fatal_insn ("this is the insn:", insn);
     }
 }
 
@@ -5036,7 +5036,7 @@ failed_reload (insn, r)
 {
   if (asm_noperands (PATTERN (insn)) < 0)
     /* It's the compiler's fault.  */
-    fatal_insn ("Could not find a spill register", insn);
+    fatal_insn ("could not find a spill register", insn);
 
   /* It's the user's fault; the operand's mode and constraint
      don't match.  Disable this reload so we don't crash in final.  */
diff --git a/gcc/rtl-error.c b/gcc/rtl-error.c
index 7515f527f92..031fa2b1553 100644
--- a/gcc/rtl-error.c
+++ b/gcc/rtl-error.c
@@ -136,9 +136,9 @@ _fatal_insn_not_found (insn, file, line, function)
      const char *function;
 {
   if (INSN_CODE (insn) < 0)
-    _fatal_insn ("Unrecognizable insn:", insn, file, line, function);
+    _fatal_insn ("unrecognizable insn:", insn, file, line, function);
   else
-    _fatal_insn ("Insn does not satisfy its constraints:",
+    _fatal_insn ("insn does not satisfy its constraints:",
 		insn, file, line, function);
 }
 
diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog
index f3269906c64..6f19f84048c 100644
--- a/gcc/testsuite/ChangeLog
+++ b/gcc/testsuite/ChangeLog
@@ -1,3 +1,12 @@
+2001-12-02  Neil Booth  <neil@daikokuya.demon.co.uk>
+
+	* objc.dg/alias.m: Update.
+	* objc.dg/class-1.m: Update.
+	* objc.dg/const-str-1.m: Update.
+	* objc.dg/fwd-proto-1.m: Update.
+	* objc.dg/id-1.m: Update.
+	* objc.dg/super-class-1.m: Update.
+
 2001-11-29  Mark Mitchell  <mark@codesourcery.com>
 
 	* g++.old-deja/g++.pt/memtemp100.C: Remove non-standard
diff --git a/gcc/testsuite/objc.dg/alias.m b/gcc/testsuite/objc.dg/alias.m
index bf6d12d4e4d..a57d032eb37 100644
--- a/gcc/testsuite/objc.dg/alias.m
+++ b/gcc/testsuite/objc.dg/alias.m
@@ -1,7 +1,7 @@
 /* Test alias warnings.  */
 /* { dg-do compile } */
 
-@compatibility_alias class1 class2; /* { dg-warning "Cannot find class" } */
+@compatibility_alias class1 class2; /* { dg-warning "annot find class" } */
 
 @interface class3;
 @end
@@ -9,4 +9,4 @@
 @interface class4;
 @end
 
-@compatibility_alias class4 class3;  /* { dg-warning "Class" "already exists" } */
+@compatibility_alias class4 class3;  /* { dg-warning "lass" "already exists" } */
diff --git a/gcc/testsuite/objc.dg/class-1.m b/gcc/testsuite/objc.dg/class-1.m
index a7760e10484..64304f590ec 100644
--- a/gcc/testsuite/objc.dg/class-1.m
+++ b/gcc/testsuite/objc.dg/class-1.m
@@ -17,4 +17,4 @@ int glob;
 @implementation glob
 @end  /* { dg-error "redeclared as different kind of symbol" } */
 /* { dg-error "previous declaration of" "" { target *-*-* } 15 } */
-/* { dg-warning "Cannot find interface declaration" "" { target *-*-* } 18 } */
+/* { dg-warning "annot find interface declaration" "" { target *-*-* } 18 } */
diff --git a/gcc/testsuite/objc.dg/const-str-1.m b/gcc/testsuite/objc.dg/const-str-1.m
index 1d94faa1757..6c6ae050cba 100644
--- a/gcc/testsuite/objc.dg/const-str-1.m
+++ b/gcc/testsuite/objc.dg/const-str-1.m
@@ -4,7 +4,7 @@
 
 int foo()
 {
-  baz(@"hiya");  /* { dg-error "Cannot find interface declaration" } */
+  baz(@"hiya");  /* { dg-error "annot find interface declaration" } */
 }
 
 @interface NXConstantString
diff --git a/gcc/testsuite/objc.dg/fwd-proto-1.m b/gcc/testsuite/objc.dg/fwd-proto-1.m
index fd887802ada..3b21c513c52 100644
--- a/gcc/testsuite/objc.dg/fwd-proto-1.m
+++ b/gcc/testsuite/objc.dg/fwd-proto-1.m
@@ -10,12 +10,12 @@ typedef struct objc_object { struct objc_class *class_pointer; } *id;
 
 @protocol Foo 
 - (id <Bar>)someMethod;
-- (id <Baz>)anotherMethod; /* { dg-error "Cannot find protocol declaration" } */
+- (id <Baz>)anotherMethod; /* { dg-error "annot find protocol declaration" } */
 @end
 
 @protocol Bar <Boo>
 - (id <Foo>)someOtherMethod;
-- (id <Baz>)anotherMethod; /* { dg-error "Cannot find protocol declaration" } */
+- (id <Baz>)anotherMethod; /* { dg-error "annot find protocol declaration" } */
 - (id <Boo>)yetAnotherMethod;
 @end
 
diff --git a/gcc/testsuite/objc.dg/id-1.m b/gcc/testsuite/objc.dg/id-1.m
index 026a6d4b8ae..abc17bc67cc 100644
--- a/gcc/testsuite/objc.dg/id-1.m
+++ b/gcc/testsuite/objc.dg/id-1.m
@@ -3,4 +3,4 @@
 
 typedef int id;
 
-id b; /* { dg-warning "Unexpected type for `id'" } */
+id b; /* { dg-warning "nexpected type for `id'" } */
diff --git a/gcc/testsuite/objc.dg/super-class-1.m b/gcc/testsuite/objc.dg/super-class-1.m
index d4252c97eba..9c8ab86d3a3 100644
--- a/gcc/testsuite/objc.dg/super-class-1.m
+++ b/gcc/testsuite/objc.dg/super-class-1.m
@@ -2,4 +2,4 @@
 /* { dg-do compile } */
 
 @interface class0 : supclass0
-@end  /* { dg-error "Cannot find interface declaration for .*, superclass" } */
+@end  /* { dg-error "annot find interface declaration for .*, superclass" } */
diff --git a/gcc/toplev.c b/gcc/toplev.c
index e2c2e25996c..311ef95b7d0 100644
--- a/gcc/toplev.c
+++ b/gcc/toplev.c
@@ -1582,7 +1582,7 @@ read_integral_parameter (p, pname, defval)
   if (*endp != 0)
     {
       if (pname != 0)
-	error ("Invalid option `%s'", pname);
+	error ("invalid option `%s'", pname);
       return defval;
     }
 
@@ -1728,7 +1728,7 @@ static void
 crash_signal (signo)
      int signo;
 {
-  internal_error ("Internal error: %s", strsignal (signo));
+  internal_error ("internal error: %s", strsignal (signo));
 }
 
 /* Strip off a legitimate source ending from the input string NAME of
@@ -3887,7 +3887,7 @@ decode_f_option (arg)
         diagnostic_prefixing_rule (global_dc)
           = DIAGNOSTICS_SHOW_PREFIX_EVERY_LINE;
       else
-	error ("Unrecognized option `%s'", arg - 2);
+	error ("unrecognized option `%s'", arg - 2);
     }
   else if (!strcmp (arg, "no-stack-limit"))
     stack_limit_rtx = NULL_RTX;
@@ -4353,7 +4353,7 @@ set_target_switch (name)
 #endif
 
   if (!valid_target_option)
-    error ("Invalid option `%s'", name);
+    error ("invalid option `%s'", name);
 }
 
 /* Print version information to FILE.
@@ -4771,17 +4771,17 @@ parse_options_and_default_flags (argc, argv)
 	    {
 	      if (extra_warnings)
 		{
-		  warning ("Ignoring command line option '%s'", argv[i]);
+		  warning ("ignoring command line option '%s'", argv[i]);
 		  if (lang)
 		    warning
-		      ("(It is valid for %s but not the selected language)",
+		      ("(it is valid for %s but not the selected language)",
 		       lang);
 		}
 	    }
 	  else if (argv[i][0] == '-' && argv[i][1] == 'g')
 	    warning ("`%s': unknown or unsupported -g option", &argv[i][2]);
 	  else
-	    error ("Unrecognized option `%s'", argv[i]);
+	    error ("unrecognized option `%s'", argv[i]);
 
 	  i++;
 	}
diff --git a/gcc/tradcif.y b/gcc/tradcif.y
index baafad1999e..4598d615b56 100644
--- a/gcc/tradcif.y
+++ b/gcc/tradcif.y
@@ -274,7 +274,7 @@ parse_number (olen)
   }
 
   if (len != 0) {
-    yyerror ("Invalid number in #if expression");
+    yyerror ("invalid number in #if expression");
     return ERROR;
   }
 
@@ -355,7 +355,7 @@ yylex ()
     yylval.integer.unsignedp = 0;
     c = *lexptr++;
     if (c != '\'') {
-      yyerror ("Invalid character constant in #if");
+      yyerror ("invalid character constant in #if");
       return ERROR;
     }
     
@@ -405,7 +405,7 @@ yylex ()
   }
   
   if (!is_idstart (c)) {
-    yyerror ("Invalid token in expression");
+    yyerror ("invalid token in expression");
     return ERROR;
   }
   
diff --git a/gcc/tradcpp.c b/gcc/tradcpp.c
index 730dfaa27cd..c3d98dfc16d 100644
--- a/gcc/tradcpp.c
+++ b/gcc/tradcpp.c
@@ -550,7 +550,7 @@ main (argc, argv)
   for (i = 1; i < argc; i++) {
     if (argv[i][0] != '-') {
       if (out_fname != NULL)
-	fatal ("Usage: %s [switches] input output", argv[0]);
+	fatal ("usage: %s [switches] input output", argv[0]);
       else if (in_fname != NULL)
 	out_fname = argv[i];
       else
@@ -582,7 +582,7 @@ main (argc, argv)
 	if (!strcmp (argv[i], "-include"))
 	  {
 	    if (i + 1 == argc)
-	      fatal ("Filename missing after -i option");
+	      fatal ("filename missing after -i option");
 	    else
 	      pend[i].type = PD_FILE, pend[i].arg = argv[i + 1], i++;
 	  }
@@ -598,9 +598,9 @@ main (argc, argv)
 
       case 'o':
 	if (out_fname != NULL)
-	  fatal ("Output filename specified twice");
+	  fatal ("output filename specified twice");
 	if (i + 1 == argc)
-	  fatal ("Filename missing after -o option");
+	  fatal ("filename missing after -o option");
 	out_fname = argv[++i];
 	if (!strcmp (out_fname, "-"))
 	  out_fname = "";
@@ -659,7 +659,7 @@ main (argc, argv)
 	    int quoted = argv[i][2] == 'Q';
 
 	    if (*tgt == '\0' && i + 1 == argc)
-	      fatal ("Target missing after %s option", argv[i]);
+	      fatal ("target missing after %s option", argv[i]);
 	    else
 	      {
 		if (*tgt == '\0')
@@ -673,7 +673,7 @@ main (argc, argv)
 	    if (*p)
 	      deps_file = p;
 	    else if (i + 1 == argc)
-	      fatal ("Filename missing after %s option", argv[i]);
+	      fatal ("filename missing after %s option", argv[i]);
 	    else
 	      deps_file = argv[++i];
 	  }
@@ -698,7 +698,7 @@ main (argc, argv)
 	  if (argv[i][2] != 0)
 	    p = argv[i] + 2;
 	  else if (i + 1 == argc)
-	    fatal ("Macro name missing after -%c option", c);
+	    fatal ("macro name missing after -%c option", c);
 	  else
 	    p = argv[++i];
 
@@ -749,7 +749,7 @@ main (argc, argv)
 	    if (argv[i][1] == 'I' && argv[i][2] != 0)
 	      dirtmp->fname = argv[i] + 2;
 	    else if (i + 1 == argc)
-	      fatal ("Directory name missing after -I option");
+	      fatal ("directory name missing after -I option");
 	    else
 	      dirtmp->fname = argv[++i];
 	    if (strlen (dirtmp->fname) > max_include_len)
@@ -776,7 +776,7 @@ main (argc, argv)
 	}	/* else fall through into error */
 
       default:
-	fatal ("Invalid option `%s'", argv[i]);
+	fatal ("invalid option `%s'", argv[i]);
       }
     }
   }
@@ -4743,7 +4743,7 @@ fancy_abort (line, func)
      int line;
      const char *func;
 {
-  fatal ("Internal error in %s, at tradcpp.c:%d\n\
+  fatal ("internal error in %s, at tradcpp.c:%d\n\
 Please submit a full bug report.\n\
 See %s for instructions.", func, line, GCCBUGURL);
 }
diff --git a/gcc/tree.c b/gcc/tree.c
index 80458512b18..39ce8d8842e 100644
--- a/gcc/tree.c
+++ b/gcc/tree.c
@@ -4686,7 +4686,7 @@ tree_check_failed (node, code, file, line, function)
      int line;
      const char *function;
 {
-  internal_error ("Tree check: expected %s, have %s in %s, at %s:%d",
+  internal_error ("tree check: expected %s, have %s in %s, at %s:%d",
 		  tree_code_name[code], tree_code_name[TREE_CODE (node)],
 		  function, trim_filename (file), line);
 }
@@ -4703,7 +4703,7 @@ tree_class_check_failed (node, cl, file, line, function)
      const char *function;
 {
   internal_error
-    ("Tree check: expected class '%c', have '%c' (%s) in %s, at %s:%d",
+    ("tree check: expected class '%c', have '%c' (%s) in %s, at %s:%d",
      cl, TREE_CODE_CLASS (TREE_CODE (node)),
      tree_code_name[TREE_CODE (node)], function, trim_filename (file), line);
 }
diff --git a/gcc/varray.c b/gcc/varray.c
index ffff576d49c..aa6de129ec8 100644
--- a/gcc/varray.c
+++ b/gcc/varray.c
@@ -85,7 +85,7 @@ varray_check_failed (va, n, file, line, function)
      int line;
      const char *function;
 {
-  internal_error ("Virtual array %s[%lu]: element %lu out of bounds in %s, at %s:%d",
+  internal_error ("virtual array %s[%lu]: element %lu out of bounds in %s, at %s:%d",
 		  va->name, (unsigned long) va->num_elements, (unsigned long) n,
 		  function, trim_filename (file), line);
 }
diff --git a/gcc/xcoffout.c b/gcc/xcoffout.c
index 36a1e726559..af7ce98ab23 100644
--- a/gcc/xcoffout.c
+++ b/gcc/xcoffout.c
@@ -167,7 +167,7 @@ xcoff_output_standard_types (syms)
 /* Print an error message for unrecognized stab codes.  */
 
 #define UNKNOWN_STAB(STR)	\
-  internal_error ("No sclass for %s stab (0x%x)\n", STR, stab)
+  internal_error ("no sclass for %s stab (0x%x)\n", STR, stab)
 
 /* Conversion routine from BSD stabs to AIX storage classes.  */