cpperror.c (_cpp_begin_message): Do the test for suppression of warnings and…

cpperror.c (_cpp_begin_message): Do the test for suppression of warnings and pedantic warnings before the "is a...

	* cpperror.c (_cpp_begin_message):  Do the test for suppression
        of warnings and pedantic warnings before the "is a warning an
        error" tests.
	* cppinit.c (cpp_handle_option): Remove surplus \n.
	* cpplex.c (ON_REST_ARG): Delete.
	(skip_block_comment): Initialise prevc.
	(parse_args): Improve error messages.
	(maybe_paste_with_next): Use CONTEXT_VARARGS rather
	than ON_REST_ARG.
	* cpplib.c (cpp_push_buffer): Fix grammar in message.
	* cppmain.c (main): Set callbacks for #ident and #pragma
	only if no_output option is false.
	(do_pragma_implementation): Only call the #pragma handler
	if it is set in the cpp_reader structure.

From-SVN: r36655

gcc/ChangeLog

+2000-09-28  Neil Booth  <neilb@earthling.net>
+
+	* cpperror.c (_cpp_begin_message):  Do the test for suppression
+        of warnings and pedantic warnings before the "is a warning an
+        error" tests.
+	* cppinit.c (cpp_handle_option): Remove surplus \n.
+	* cpplex.c (ON_REST_ARG): Delete.
+	(skip_block_comment): Initialise prevc.
+	(parse_args): Improve error messages.
+	(maybe_paste_with_next): Use CONTEXT_VARARGS rather
+	than ON_REST_ARG.
+	* cpplib.c (cpp_push_buffer): Fix grammar in message.
+	* cppmain.c (main): Set callbacks for #ident and #pragma
+	only if no_output option is false.
+	(do_pragma_implementation): Only call the #pragma handler
+	if it is set in the cpp_reader structure.
+
 Wed Sep 27 14:00:07 2000  Donald Lindsay  <dlindsay@cygnus.com>
 
 	* integrate.c (copy_insn_list): if an ignored return value

gcc/cpperror.c

@@ -120,11 +120,12 @@ _cpp_begin_message (pfile, code, file, line, col)
   switch (code)
     {
     case WARNING:
+      if (CPP_IN_SYSTEM_HEADER (pfile)
+	  && ! CPP_OPTION (pfile, warn_system_headers))
+	return 0;
       if (! CPP_OPTION (pfile, warnings_are_errors))
 	{
-          if (CPP_OPTION (pfile, inhibit_warnings)
-	      || (CPP_IN_SYSTEM_HEADER (pfile)
-		  && ! CPP_OPTION (pfile, warn_system_headers)))
+          if (CPP_OPTION (pfile, inhibit_warnings))
 	    return 0;
 	  is_warning = 1;
 	}
@@ -138,11 +139,12 @@ _cpp_begin_message (pfile, code, file, line, col)
       break;
 
     case PEDWARN:
+      if (CPP_IN_SYSTEM_HEADER (pfile)
+	  && ! CPP_OPTION (pfile, warn_system_headers))
+	return 0;
       if (! CPP_OPTION (pfile, pedantic_errors))
 	{
-          if (CPP_OPTION (pfile, inhibit_warnings)
-	      || (CPP_IN_SYSTEM_HEADER (pfile)
-		  && ! CPP_OPTION (pfile, warn_system_headers)))
+          if (CPP_OPTION (pfile, inhibit_warnings))
 	    return 0;
 	  is_warning = 1;
 	}

gcc/cppinit.c

@@ -1403,7 +1403,7 @@ cpp_handle_option (pfile, argc, argv)
 	    CPP_OPTION (pfile, out_fname) = "";
 	  break;
 	case OPT_v:
-	  fprintf (stderr, _("GNU CPP version %s (cpplib)\n"), version_string);
+	  fprintf (stderr, _("GNU CPP version %s (cpplib)"), version_string);
 #ifdef TARGET_VERSION
 	  TARGET_VERSION;
 #endif

gcc/cpplex.c

@@ -162,10 +162,6 @@ TOKEN_LEN (token)
 
 #define IS_ARG_CONTEXT(c) ((c)->flags & CONTEXT_ARG)
 #define CURRENT_CONTEXT(pfile) ((pfile)->contexts + (pfile)->cur_context)
-#define ON_REST_ARG(c) \
- (((c)->u.list->flags & VAR_ARGS) \
-  && (c)->u.list->tokens[(c)->posn - 1].val.aux \
-      == (unsigned int) ((c)->u.list->paramc - 1))
 
 #define ASSIGN_FLAGS_AND_POS(d, s) \
   do {(d)->flags = (s)->flags & (PREV_WHITE | BOL | PASTE_LEFT); \
@@ -573,7 +569,7 @@ skip_block_comment (pfile)
      cpp_reader *pfile;
 {
   cpp_buffer *buffer = pfile->buffer;
-  cppchar_t c = EOF, prevc;
+  cppchar_t c = EOF, prevc = EOF;
 
   pfile->state.lexing_comment = 1;
   while (buffer->cur != buffer->rlimit)
@@ -1837,6 +1833,7 @@ is_macro_disabled (pfile, expansion, token)
       pfile->no_expand_level = context - pfile->contexts;
       next = _cpp_get_token (pfile);
       restore_macro_expansion (pfile, prev_nme);
+
       if (next->type != CPP_OPEN_PAREN)
 	{
 	  _cpp_push_token (pfile, next);
@@ -2001,7 +1998,8 @@ parse_args (pfile, hp, args)
 	}
       else
 	{
-	  cpp_error (pfile, "not enough arguments for macro \"%s\"", hp->name);
+	  cpp_error (pfile, "%u arguments is not enough for macro \"%s\"",
+		     argc, hp->name);
 	  return 1;
 	}
     }
@@ -2009,7 +2007,8 @@ parse_args (pfile, hp, args)
   else if (argc > macro->paramc
 	   && !(macro->paramc == 0 && argc == 1 && empty_argument (args, 0)))
     {
-      cpp_error (pfile, "too many arguments for macro \"%s\"", hp->name);
+      cpp_error (pfile, "%u arguments is too many for macro \"%s\"",
+		 argc, hp->name);
       return 1;
     }
 
@@ -2331,8 +2330,8 @@ maybe_paste_with_next (pfile, token)
 		     <whatever> came from a variable argument, because
 		     the author probably intended the ## to trigger
 		     the special extended semantics (see above).  */
-		  if (token->type == CPP_COMMA && IS_ARG_CONTEXT (context)
-		      && ON_REST_ARG (context - 1))
+		  if (token->type == CPP_COMMA
+		      && (context->flags & CONTEXT_VARARGS))
 		    /* no warning */;
 		  else
 		    cpp_warning (pfile,

gcc/cpplib.c

@@ -1495,7 +1495,7 @@ cpp_push_buffer (pfile, buffer, length)
   cpp_buffer *new;
   if (++pfile->buffer_stack_depth == CPP_STACK_MAX)
     {
-      cpp_fatal (pfile, "#include nested too deep");
+      cpp_fatal (pfile, "#include nested too deeply");
       return NULL;
     }
   if (pfile->cur_context > 0)

gcc/cppmain.c

@@ -88,15 +88,21 @@ main (argc, argv)
     return (FATAL_EXIT_CODE);
 
   /* Set callbacks.  */
-  if (! CPP_OPTION (pfile, no_line_commands)
-      && ! CPP_OPTION (pfile, no_output))
+  if (! CPP_OPTION (pfile, no_output))
     {
-      pfile->cb.enter_file = cb_enter_file;
-      pfile->cb.leave_file = cb_leave_file;
-      pfile->cb.rename_file = cb_rename_file;
+      pfile->cb.ident      = cb_ident;
+      pfile->cb.def_pragma = cb_def_pragma;
+      if (! CPP_OPTION (pfile, no_line_commands))
+	{
+	  pfile->cb.enter_file = cb_enter_file;
+	  pfile->cb.leave_file = cb_leave_file;
+	  pfile->cb.rename_file = cb_rename_file;
+	}
     }
+
   if (CPP_OPTION (pfile, dump_includes))
     pfile->cb.include  = cb_include;
+
   if (CPP_OPTION (pfile, debug_output)
       || CPP_OPTION (pfile, dump_macros) == dump_names
       || CPP_OPTION (pfile, dump_macros) == dump_definitions)
@@ -105,8 +111,6 @@ main (argc, argv)
       pfile->cb.undef  = cb_undef;
       pfile->cb.poison = cb_def_pragma;
     }
-  pfile->cb.ident      = cb_ident;
-  pfile->cb.def_pragma = cb_def_pragma;
 
   /* Register one #pragma which needs special handling.  */
   cpp_register_pragma(pfile, 0, "implementation", do_pragma_implementation);
@@ -271,7 +275,8 @@ do_pragma_implementation (pfile)
     }
 
   /* forward to default-pragma handler.  */
-  cb_def_pragma (pfile);
+  if (pfile->cb.def_pragma)
+    (*pfile->cb.def_pragma) (pfile);
 }
 
 /* Dump out the hash table.  */