[F03] EXTENDS_TYPE_OF, CLASS IS and libgfortran

[Janus Weil]

> So, I'd say EXTENDS_TYPE_OF is basically done. I will check if there
> are any details missing, and then move on to CLASS IS.

Before I start with CLASS IS, I'd like to get this patch into the
branch. The attached version regtests fine and provides all
functionality for EXTENDS_TYPE_OF, AFAICS. Is it ok if I commit to the
branch?

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.
-------------- next part --------------
A non-text attachment was scrubbed...
Name: extends_type_of.diff
Type: text/x-diff
Size: 14026 bytes
Desc: not available
URL: <http://gcc.gnu.org/pipermail/fortran/attachments/20091105/7af034e5/attachment.bin>
-------------- next part --------------
A non-text attachment was scrubbed...
Name: extends_type_of_1.f03
Type: application/octet-stream
Size: 1114 bytes
Desc: not available
URL: <http://gcc.gnu.org/pipermail/fortran/attachments/20091105/7af034e5/attachment.obj>