[Patch, fortran] PR30883 - procedure with dummy procedure f1 rejected with implicit none

[Paul Richard Thomas]

:ADDPATCH fortran:

This is a very straightforward patch for a rejects-valid and the
ChangeLog and comment tell the story.  The testscase is a development
of the reporter's - Lahey's F95 online checker agrees with the default
typing.

Bootstrapped and regtested on x86_ia64/FC5 - OK for trunk and, later, for 4.2?

Paul

PS I have 1 other rejects-valid (PR30880) and 2 ICE-on-valids
(PR30531/PR31086) awaiting review - can somebody take a look at them,
please?

2007-03-11  Paul Thomas  <pault@gcc.gnu.org>

	PR fortran/30883
	* parse.c (parse_interface): Use the default types from the
	formal namespace if a function or its result do not have a type
	after parsing the specification statements.

2007-03-11  Paul Thomas  <pault@gcc.gnu.org>

	PR fortran/30883
	* gfortran.dg/interface_11.f90: New test.
-------------- next part --------------
A non-text attachment was scrubbed...
Name: Change.Logs
Type: application/octet-stream
Size: 343 bytes
Desc: not available
URL: <http://gcc.gnu.org/pipermail/fortran/attachments/20070311/37618706/attachment.obj>
-------------- next part --------------
A non-text attachment was scrubbed...
Name: pr30883.diff
Type: text/x-patch
Size: 2067 bytes
Desc: not available
URL: <http://gcc.gnu.org/pipermail/fortran/attachments/20070311/37618706/attachment.bin>