cpplib.c (do_elif): Skip the rest of the line if we're not going to bother evaluating it.

	* cpplib.c (do_elif): Skip the rest of the line if we're
	not going to bother evaluating it.
	(skip_if_group): Clear pfile->only_seen_white.  Reorder loop
	to avoid pointless calls to the lexer.

	* gcc.dg/cpp-mi2.c: New test.
	* gcc.dg/cpp-mi2[abc].h: New files.

From-SVN: r33008

gcc/ChangeLog

+2000-04-07  Zack Weinberg  <zack@wolery.cumb.org>
+
+	* cpplib.c (do_elif): Skip the rest of the line if we're
+	not going to bother evaluating it.
+	(skip_if_group): Clear pfile->only_seen_white.  Reorder loop
+	to avoid pointless calls to the lexer.
+
 Fri Apr  7 11:50:54 2000  Jim Wilson  <wilson@cygnus.com>
 
 	* config/ia64/ia64.c: Delete stdio.h and ctype.h includes.

gcc/cpplib.c

@@ -1266,7 +1266,10 @@ do_elif (pfile)
     }
 
   if (pfile->if_stack->if_succeeded)
-    return skip_if_group (pfile);
+    {
+      _cpp_skip_rest_of_line (pfile);
+      return skip_if_group (pfile);
+    }
   if (_cpp_parse_expr (pfile) == 0)
     return skip_if_group (pfile);
 
@@ -1498,11 +1501,24 @@ skip_if_group (pfile)
   long old_written;
   int ret = 0;
 
+  /* We are no longer at the start of the file.  */
+  pfile->only_seen_white = 0;
+
   old_written = CPP_WRITTEN (pfile);
   pfile->no_macro_expand++;
   CPP_OPTION (pfile, no_line_commands)++;
   for (;;)
     {
+      /* We are at the end of a line.  Only cpp_get_token knows how to
+	 advance the line number correctly.  */
+      token = cpp_get_token (pfile);
+      if (token == CPP_POP)
+	break;  /* Caller will issue error.  */
+      
+      else if (token != CPP_VSPACE)
+	cpp_ice (pfile, "cpp_get_token returned %d in skip_if_group", token);
+      CPP_SET_WRITTEN (pfile, old_written);
+
       token = _cpp_get_directive_token (pfile);
 
       if (token == CPP_DIRECTIVE)
@@ -1514,16 +1530,6 @@ skip_if_group (pfile)
 
       if (token != CPP_VSPACE)
 	_cpp_skip_rest_of_line (pfile);
-
-      /* Only cpp_get_token knows how to advance the line number
-	 properly.  */
-      token = cpp_get_token (pfile);
-      if (token == CPP_POP)
-	break;  /* Caller will issue error.  */
-      
-      else if (token != CPP_VSPACE)
-	cpp_ice (pfile, "cpp_get_token returned %d in skip_if_group", token);
-      CPP_SET_WRITTEN (pfile, old_written);
     }
   CPP_SET_WRITTEN (pfile, old_written);
   pfile->no_macro_expand--;

gcc/testsuite/ChangeLog

+2000-04-07  Zack Weinberg  <zack@wolery.cumb.org>
+
+	* gcc.dg/cpp-mi2.c: New test.
+	* gcc.dg/cpp-mi2[abc].h: New files.
+
 2000-04-07  Nathan Sidwell  <nathan@codesourcery.com>
 
 	* g++.old-deja/g++.abi/vmihint.C: Adjust __vmi_class_type_info

gcc/testsuite/gcc.dg/cpp-mi2.c

+/* Test for overly eager multiple include optimization.
+   Problem distilled from glibc 2.0.7's time.h, sys/time.h, timebits.h.
+   Problem noted by Tom Tromey <tromey@cygnus.com>.  */
+/* { dg-do compile } */
+
+#include "cpp-mi2a.h"
+#include "cpp-mi2b.h"
+
+int main (void)
+{
+  return x;
+}

gcc/testsuite/gcc.dg/cpp-mi2a.h

+/* Test for overly eager multiple include optimization.
+   Problem distilled from glibc 2.0.7's time.h, sys/time.h, timebits.h. 
+   Problem noted by Tom Tromey <tromey@cygnus.com>.  */
+
+#include "cpp-mi2c.h"

gcc/testsuite/gcc.dg/cpp-mi2b.h

+/* Test for overly eager multiple include optimization.
+   Problem distilled from glibc 2.0.7's time.h, sys/time.h, timebits.h. 
+   Problem noted by Tom Tromey <tromey@cygnus.com>.  */
+
+#define need_x
+#include "cpp-mi2c.h"

gcc/testsuite/gcc.dg/cpp-mi2c.h

+/* Test for overly eager multiple include optimization.
+   Problem distilled from glibc 2.0.7's time.h, sys/time.h, timebits.h. 
+   Problem noted by Tom Tromey <tromey@cygnus.com>.  */
+#ifdef need_x
+#undef need_x
+#ifndef have_x
+#define have_x
+extern int x;
+#endif
+#endif
+
+#ifndef t_h
+#define t_h
+extern int y;
+#endif