Re: [F03] EXTENDS_TYPE_OF, CLASS IS and libgfortran

[Janus Weil <janus at gcc dot gnu dot org>]

>> Thanks for the patch and please do not forget to add it to fortran-dev.
>
> This I can surely do ;)

Committed as r153994. Thanks for the review.

Btw, I'm not aware of any compiler besides gfortran (fortran-dev
branch), which is able to handle the new test case
extends_type_of_1.f03 ...

ifort 11.1 gives:

: catastrophic error: **Internal compiler error: segmentation
violation signal raised** Please report this error along with the
circumstances in which it occurred in a Software Problem Report.
Note: File and line given may not be explicit cause of this error.

and nagfor 5.2:

Warning: extends_type_of_1.f03, line 49: Type declaration for generic
intrinsic EXTENDS_TYPE_OF ignored
         detected at END@<end-of-statement>
Panic: extends_type_of_1.f03, line 33: Generic intrinsic
EXTENDS_TYPE_OF does not exist
Internal Error -- please report this bug

:)

Cheers,
Janus



>> 2009-11-04 ?Janus Weil ?<janus@gcc.gnu.org>
>>
>> ? ? ? ?* intrinsic.h (gfc_resolve_extends_type_of): Add prototype
>> ? ? ? ?* intrinsic.c (add_functions): Use 'gfc_resolve_extends_type_of'.
>> ? ? ? ?* iresolve.c (gfc_resolve_extends_type_of): New function, which replaces
>> ? ? ? ?the call to EXTENDS_TYPE_OF by the library function 'is_extension_of'
>> ? ? ? ?and modifies the arguments.
>> ? ? ? ?* trans-intrinsic.c (gfc_conv_extends_type_of): Removed.
>> ? ? ? ?(gfc_conv_intrinsic_function): FOR EXTENDS_TYPE_OF, don't call
>> ? ? ? ?gfc_conv_extends_type_of but gfc_conv_intrinsic_funcall.
>>
>>
>> 2009-11-04 ?Janus Weil ?<janusw@gcc.gnu.org>
>>
>> ? ? ? ?* gfortran.map: Add _gfortran_is_extension_of.
>> ? ? ? ?* Makefile.am: Add intrinsics/extends_type_of.c.
>> ? ? ? ?* Makefile.in: Regenerated.
>> ? ? ? ?* intrinsics/extends_type_of.c: New file.
>>
>>
>> 2009-11-04 ?Janus Weil ?<janusw@gcc.gnu.org>
>>
>> ? ? ? ?* gfortran.dg/extends_type_of_1.f03: New test.
>> ? ? ? ?* gfortran.dg/same_type_as_1.f03: Extended.
>>
>