This is the mail archive of the gcc-patches@gcc.gnu.org mailing list for the GCC project.


Index Nav: [Date Index] [Subject Index] [Author Index] [Thread Index]
Message Nav: [Date Prev] [Date Next] [Thread Prev] [Thread Next]
Other format: [Raw text]

Re: [gfortran] PATCH Fix PR 18537


On Sat, Mar 05, 2005 at 09:21:56PM -0800, Steve Kargl wrote:
> The attached patch fixes PR fortran/18537.  I have
> bootstrapped and regression tested on i386-*-freebsd.
> Note, I've placed a throttle of 10 warnings per file
> on the changes.  I suspect that if 1 tab is embedded
> in a source file, then we'll see a boat load.
> 
> 2005-03-05  Steven G. Kargl  <kargls@comcast.net>
> 
> 	scanner.c (gfc_gobble_whitespace, load_line): Warn about nonstandard tab.
> 

Here's a new patch for PR fortran/18537.  It introduces a new
option -Wtabs that flags the nonstandard tab character.  -Wtabs
is activated for -Wall and -std=f95.  The default behaviour of
gfortran is to accept a tab as whitespace.  The patch and testsuite
programs have been bootstrapped and regression tested on mainline
for i386-*-freebsd and amd64-*-freebsd.  The patch and testsuite
programs have been bootstrapped and regtested on the 4.0 branch
for amd64-*-freebsd.  There are no new regressions.  Ok for
mainline and 4.0?

2005-03-07  Steven G. Kargl  <kargls@comcast.net>

	PR fortran/18537
	* gfortran.h (gfc_option_t): Add warn_tabs member.
	* lang.opt: New option -Wtabs.
	* invoke.texi: document it; Correctly spell FORTRAN as Fortran.
	* options.c (gfc_init_options, gfc_post_options, set_Wall,
	gfc_handle_option): Set it.
	*scanner.c (load_line): Use it

2005-03-07  Steven G. Kargl  <kargls@comcast.net>

	* gfortran.dg/PR18537.f: New test.
	* gfortran.dg/PR18537.f90: ditto.
-- 
Steve

Attachment: PR18537.diff
Description: Text document

Attachment: PR18537.f
Description: Text document

Attachment: PR18537.f90
Description: Text document


Index Nav: [Date Index] [Subject Index] [Author Index] [Thread Index]
Message Nav: [Date Prev] [Date Next] [Thread Prev] [Thread Next]