This is the mail archive of the gcc-patches@gcc.gnu.org mailing list for the GCC project.


Index Nav: [Date Index] [Subject Index] [Author Index] [Thread Index]
Message Nav: [Date Prev] [Date Next] [Thread Prev] [Thread Next]
Other format: [Raw text]

Re: [Patch, Fortran] PR57530 (Part 2 of 3) Support TYPE => CLASS


Dear Tobias,

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.

Thanks for the patch

Paul

On 27 July 2013 21:51, Tobias Burnus <burnus@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


Index Nav: [Date Index] [Subject Index] [Author Index] [Thread Index]
Message Nav: [Date Prev] [Date Next] [Thread Prev] [Thread Next]