[patch, fortran] PR32760 Error defining subroutine named PRINT

[Jerry DeLisle]

Hi all,

This simple patch fixes this problem by avoiding gfc_add_flavor when the symbol 
has the ACCESS_PUBLIC or ACCESS_PRIVATE attributes.

I must give credit to Daniel for tracking down the approximate location of this 
bug which allowed me to hunt around some and find it.

Regression tested on x86-64-Gnu/Linux.  Test case provided.

OK for trunk?

Regards,

Jerry

2007-07-26  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
	    Daniel Franke  <franke.daniel@gmail.com>

	PR fortran/32760
	* primary.c (match_variable): Do not call gfc_add_flavor if symbol has
	attribute of ACCESS_PUBLIC or ACCESS_PRIVATE already marked.
-------------- next part --------------
A non-text attachment was scrubbed...
Name: pr32760.diff
Type: text/x-patch
Size: 453 bytes
Desc: not available
URL: <http://gcc.gnu.org/pipermail/gcc-patches/attachments/20070727/c12a6fbc/attachment.bin>
-------------- next part --------------
A non-text attachment was scrubbed...
Name: private_type_7.f90
Type: text/x-fortran
Size: 548 bytes
Desc: not available
URL: <http://gcc.gnu.org/pipermail/gcc-patches/attachments/20070727/c12a6fbc/attachment-0001.bin>