> I think that Janus's OK of the 27th was already enough :-) > > The tweaks that you have made since make it look much cleaner. So, > once more - OK for trunk.
Agreed. Sorry for the late reply, Janus > On 27 July 2013 21:51, Tobias Burnus <bur...@net-b.de> wrote: >> Tobias Burnus wrote: >>> >>> Giving up on the class.c version, would be the following change okay? >>> >>> + if (expr1->ts.type == BT_DERIVED && expr2->ts.type == BT_CLASS >>> + && expr2->expr_type != EXPR_FUNCTION) >>> + { >>> + gfc_add_data_component (expr2); >>> + /* The following is required as gfc_add_data_component doesn't >>> + update ts.type if there is a tailing REF_ARRAY. */ >>> + expr2->ts.type = BT_DERIVED; >>> + } >>> >>> It still feels a bit like a hack - but it is definitely much cleaner than >>> my previous band aid. >>> Built and regtested on x86-64-gnu-linux. >>> OK? >> >> >> Attached is now the patch which does what I wrote above. >> >> OK? >> >> Tobias > > > > -- > The knack of flying is learning how to throw yourself at the ground and miss. > --Hitchhikers Guide to the Galaxy