[Bug fortran/90786] [7/8/9/10 Regression] ICE on procedure pointer assignment to function with class pointer result

[pault at gcc dot gnu.org]

https://gcc.gnu.org/bugzilla/show_bug.cgi?id=90786

--- Comment #5 from Paul Thomas <pault at gcc dot gnu.org> ---
Author: pault
Date: Sat Jun  8 15:52:38 2019
New Revision: 272084

URL: https://gcc.gnu.org/viewcvs?rev=272084&root=gcc&view=rev
Log:
2019-06-08  Paul Thomas  <pault@gcc.gnu.org>

        PR fortran/90786
        * trans-expr.c (pointer_assignment_is_proc_pointer) Remove as
        it is very simple and only called from one place.
        (gfc_trans_pointer_assignment): Rename non_proc_pointer_assign
        as non_proc_ptr_assign. Assign to it directly, rather than call
        to above, deleted function and use gfc_expr_attr instead of
        only checking the reference chain.

2019-06-08  Paul Thomas  <pault@gcc.gnu.org>

        PR fortran/90786
        * gfortran.dg/proc_ptr_51.f90 : New test.

Added:
    trunk/gcc/testsuite/gfortran.dg/proc_ptr_51.f90
Modified:
    trunk/gcc/fortran/ChangeLog
    trunk/gcc/fortran/trans-expr.c
    trunk/gcc/testsuite/ChangeLog