F2003, sec. 4.5.1 (derived type definition): EXTENDS is an attribute that can not be specified more than once. Currently (20080803), gfortran accepts:
TYPE :: b
INTEGER :: i
TYPE, EXTENDS(b), EXTENDS(b) :: d
INTEGER :: j
By golly, I never even thought of that possibility. Thanks!
I'll fix it as obvious as soon as I can.
PS Could you please CC me next time? I do not have ove much time for hacking right now. I either do the business or follow Bugzilla:-(
> Could you please CC me next time?
Thought I did, I Surely wanted to?!
Please excuse the oversight :)
Subject: Bug 37011
Date: Fri Aug 8 23:22:51 2008
New Revision: 138891
2008-08-09 Paul Thomas <email@example.com>
* symbol.c (gfc_add_extension): New function.
* decl.c (gfc_get_type_attr_spec): Call it.
(gfc_match_derived_decl): Set symbol extension attribute from
* gfortran.h : Add prototype for gfc_add_extension.
Fixed as obvious.
Thanks for the report.