[Patch, Fortran] Fix misleading error for PROCEDURE(interface) and abstract types

[Daniel Kraft]

Tobias Burnus wrote:
> Daniel Kraft wrote:
>> when compiling this program:
>>
>>   type, abstract :: t
>>   contains
>>     procedure(foobar), deferred :: x
>>   end type t
>> end
>>
>> (I think it is legal but not yet supported by gfortran because of the
>> deferred binding)
> Well, it would be valid if you had an interface for foobar ;-)

Good catch :D

>> I'll regression test and write a ChangeLog before committing, of course.
> OK. Though, I'm wondering whether changing the order is better:
> 
> + gfc_error ("PROCEDURE(interface) not yet implemented at %C");
> 
> "PROCEDURE(interface) at %C not yet implemented[in gfortran]"

No regressions, committed with your suggested wording and an adaption to 
typebound_proc_4.f03.

Thanks for the quick reply,
Daniel


-- 
Done:     Arc-Bar-Cav-Sam-Val-Wiz, Dwa-Elf-Gno-Hum-Orc, Law-Neu-Cha, Fem-Mal
To go:    Hea-Kni-Mon-Pri-Ran-Rog-Tou