re PR fortran/9038 (-ffixed-line-length-none -x f77-cpp-input gives: Warning:…

re PR fortran/9038 (-ffixed-line-length-none -x f77-cpp-input gives: Warning: unknown register name line-length-none)

2003-02-20  Toon Moene  <toon@moene.indiv.nluug.nl>

	PR fortran/9038
	* c-opts.c (sanitize_cpp_opts): Add Fortran front end
	options to be ignored.
	(c_common_decode_option): Ignore them when preprocessing.

From-SVN: r63184

gcc/ChangeLog

+2003-02-20  Toon Moene  <toon@moene.indiv.nluug.nl>
+
+	PR fortran/9038
+	* c-opts.c (sanitize_cpp_opts): Add Fortran front end
+	options to be ignored.
+	(c_common_decode_option): Ignore them when preprocessing.
+
 Thu Feb 20 21:41:19 CET 2003  Jan Hubicka  <jh@suse.cz>
 
 	* toplev.c (flag_sched2_use_superblocks, flag_sched2_use_traces):  New global variables.

gcc/c-opts.c

@@ -212,6 +212,8 @@ static void sanitize_cpp_opts PARAMS ((void));
   OPT("fenforce-eh-specs",	CL_CXX,   OPT_fenforce_eh_specs)	     \
   OPT("fenum-int-equiv",	CL_CXX,   OPT_fenum_int_equiv)		     \
   OPT("fexternal-templates",	CL_CXX,   OPT_fexternal_templates)	     \
+  OPT("ffixed-form",		CL_C,	  OPT_ffixed_form)		     \
+  OPT("ffixed-line-length-",	CL_C | CL_JOINED, OPT_ffixed_line_length)    \
   OPT("ffor-scope",		CL_CXX,   OPT_ffor_scope)		     \
   OPT("ffreestanding",		CL_C,     OPT_ffreestanding)		     \
   OPT("fgnu-keywords",		CL_CXX,   OPT_fgnu_keywords)		     \
@@ -1142,6 +1144,13 @@ c_common_decode_option (argc, argv)
       flag_external_templates = on;
       goto cp_deprecated;
 
+    case OPT_ffixed_form:
+    case OPT_ffixed_line_length:
+      /* Fortran front end options ignored when preprocessing only.  */
+      if (flag_preprocess_only)
+        result = -1;
+      break;
+
     case OPT_ffor_scope:
       flag_new_for_scope = on;
       break;

gcc/f/ChangeLog

+2003-02-20  Toon Moene  <toon@moene.indiv.nluug.nl>
+
+	* news.texi: Document fixing PR fortran/9038.
+
 2003-02-04  Joseph S. Myers  <jsm@polyomino.org.uk>
 
 	* g77.texi, invoke.texi: Update to GFDL 1.2.

gcc/f/news.texi

@@ -11,7 +11,7 @@
 @c in the standalone derivations of this file (e.g. NEWS).
 @set copyrights-news 1995,1996,1997,1998,1999,2000,2001,2002,2003
 
-@set last-update-news 2003-01-31
+@set last-update-news 2003-02-20
 
 @ifset DOC-NEWS
 @include root.texi
@@ -189,6 +189,8 @@ gave wrong results)
 Incorrect output with 0-based array of characters
 @item 8587
 Double complex zero ** double precision number -> NaN instead of zero
+@item 9038
+-ffixed-line-length-none -x f77-cpp-input gives: Warning: unknown register name line-length-none
 @end table
 @item
 Richard Henderson (@email{rth@@redhat.com}) analyzed and improved the handling