Re: PR fortran/9038, a regression in 3.3/3.4 with respect to 3.2.

[Toon Moene <toon at moene dot indiv dot nluug dot nl>]

Neil Booth wrote:

> What I mentioned in the other mail should work.  Whatever your original
> c-opts.c patch was  probably just needs one extra line:
>
> 	case OPT_ffixed:
> +	result = -1;
> 	break;

OK, the following patch works, bootstrapped on 
powerpc-unknown-linux-gnu.  Is this OK for 3.4 (Neil) and 3.3 (Mark) ?

Thanks,

--
Toon Moene - mailto:toon at moene dot indiv dot nluug dot nl - phoneto: +31 346 214290
Saturnushof 14, 3738 XG  Maartensdijk, The Netherlands
Maintainer, GNU Fortran 77: http://gcc.gnu.org/onlinedocs/g77_news.html
GNU Fortran 95: http://gcc-g95.sourceforge.net/ (under construction)

2003-02-20  Toon Moene  <toon at moene dot indiv dot nluug dot nl>

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

*** c-opts.c.orig	Tue Jan 28 23:51:27 2003
--- c-opts.c	Wed Feb 19 22:18:51 2003
*************** static void sanitize_cpp_opts PARAMS ((v
*** 213,216 ****
--- 213,218 ----
    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)		     \
*************** c_common_decode_option (argc, argv)
*** 1143,1146 ****
--- 1145,1154 ----
        goto cp_deprecated;
  
+     case OPT_ffixed_form:
+     case OPT_ffixed_line_length:
+       /* Fortran front end options IGNORED.  */
+       result = -1;
+       break;
+ 
      case OPT_ffor_scope:
        flag_new_for_scope = on;