Re: [Patch, Fortran, OOP] PR 78848: [7 Regression] ICE on writing CLASS variable with non-typebound DTIO procedure

[Paul Richard Thomas <paul dot richard dot thomas at gmail dot com>]

Hi Janus,

Thanks for taking on the cleaning up of the dtio for me. I am up to my
eyeballs in things other than gfortran.

This patch is OK for trunk since it fixes a regression.

Looking at it, though, I realised that dynamic dispatch would be
possible. If, as each derived type is being resolved, specific DTIO
procedures are found in generic interfaces, they could be added to the
derived type's vtable. This is possibly an unnecessary embellishment
but it could be done. Please commit this fix for now, however.

Thanks

Paul

On 18 December 2016 at 13:12, Janus Weil <janus@gcc.gnu.org> wrote:
> Hi all,
>
> the attached patch fixes an ICE on a valid DTIO example, which is in
> fact a regression of one of my recent patches. See bugzilla for
> details.
>
> Regtests cleanly on x86_64-linux-gnu. Ok for trunk?
>
> Cheers,
> Janus
>
>
> 2016-12-18  Janus Weil  <janus@gcc.gnu.org>
>
>     PR fortran/78848
>     * trans-io.c (get_dtio_proc): Generate non-typebound DTIO call for class
>     variables, if no typebound DTIO procedure is available.
>
> 2016-12-18  Janus Weil  <janus@gcc.gnu.org>
>
>     PR fortran/78848
>     * gfortran.dg/dtio_22.f90: New test.



-- 
If you're walking down the right path and you're willing to keep
walking, eventually you'll make progress.

Barack Obama