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

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

diff --git a/gcc/ChangeLog b/gcc/ChangeLog
index 4d708ef4bdf9f31a73ed27d173b4323d1b1f4fbf..98f1146f99632d933b02bc0b2a797e5b038e80db 100644 (file)
--- a/gcc/ChangeLog
+++ b/gcc/ChangeLog
@@ -1,3 +1,10 @@
+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.

diff --git a/gcc/c-opts.c b/gcc/c-opts.c
index 4043447fdf2a9342185bb3de80176d3a622ed74a..075112e31f92d7ac4570b4984f1fe64b1ecf7df1 100644 (file)
--- a/gcc/c-opts.c
+++ b/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;

diff --git a/gcc/f/ChangeLog b/gcc/f/ChangeLog
index 553ce621b177af320813fed361b4093092885690..f668eac5e73a2a685da14978306328d2190d9664 100644 (file)
--- a/gcc/f/ChangeLog
+++ b/gcc/f/ChangeLog
@@ -1,3 +1,7 @@
+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.

diff --git a/gcc/f/news.texi b/gcc/f/news.texi
index d12d0bdd8e316fbcf496b83561d90ae1b1e270af..2194852f8d254b63e65cf21c105986be3b6275b7 100644 (file)
--- a/gcc/f/news.texi
+++ b/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