[F03] EXTENDS_TYPE_OF, CLASS IS and libgfortran

[Dominique Dhumieres]

> I will correct this, and add a check to
> prevent this kind of mis-declaration.

[ibook-dhum] f90/bug% gfc -Wall /opt/gcc/gcc-4.5-work/gcc/testsuite/gfortran.dg/extends_type_of_1.f03
/opt/gcc/gcc-4.5-work/gcc/testsuite/gfortran.dg/extends_type_of_1.f03:9.29:

 intrinsic :: extends_type_of
                             1
Warning: Type specified for intrinsic function 'extends_type_of' at (1) is ignored

I think the line

 integer :: extends_type_of

can be deleted.

Cheers

Dominique