g77spec.c (lang_specific_driver): Return unmolested command line when --help seen.

Tue Jul 21 04:33:37 1998  Craig Burley  <burley@gnu.org>
	* g77spec.c (lang_specific_driver): Return unmolested
	command line when --help seen.
	Comment out code that printed g77-specific --help info.

From-SVN: r21333

diff --git a/gcc/f/ChangeLog b/gcc/f/ChangeLog
index 077f9443f24468e1c19329e1d8389b4db14e74b6..f4cc5757d33c818aa4e5407b3bc818622982957b 100644 (file)
--- a/gcc/f/ChangeLog
+++ b/gcc/f/ChangeLog
@@ -1,3 +1,9 @@
+Tue Jul 21 04:33:37 1998  Craig Burley  <burley@gnu.org>
+
+       * g77spec.c (lang_specific_driver): Return unmolested
+       command line when --help seen.
+       Comment out code that printed g77-specific --help info.
+
 Sat Jul 18 19:16:48 1998  Craig Burley  <burley@gnu.org>
 
         * lang-options.h: Fix up doc strings.

diff --git a/gcc/f/g77spec.c b/gcc/f/g77spec.c
index c3850e42e3dd519c2d21598e352ad00bb5e5c0f0..79d36379a71cbd654f6082ac1eb09bdce5e2bca3 100644 (file)
--- a/gcc/f/g77spec.c
+++ b/gcc/f/g77spec.c
@@ -397,6 +397,11 @@ or type the command `info -f g77 Copying'.\n\
          break;
 
        case OPTION_help:
+         /* Let gcc.c handle this, as the egcs version has a really
+            cool facility for handling --help and --verbose --help.  */
+         return;
+
+#if 0
          printf ("\
 Usage: g77 [OPTION]... FORTRAN-SOURCE...\n\
 \n\
@@ -425,6 +430,7 @@ and `info -f gcc' to read the Info documentation.\n\
 Report bugs to <egcs-bugs@cygnus.org>.\n");
          exit (0);
          break;
+#endif
 
        case OPTION_driver:
          (*fn) ("--driver no longer supported", argv[i]);