[Bug fortran/88685] [8/9 regression] pointer class array argument indexing

[pault at gcc dot gnu.org]

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

--- Comment #7 from Paul Thomas <pault at gcc dot gnu.org> ---
Author: pault
Date: Sun Feb  3 14:37:08 2019
New Revision: 268486

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

        PR fortran/88685
        * expr.c (is_subref_array): Move the check for class pointer
        dummy arrays to after the reference check. If we haven't seen
        an array reference other than an element and a component is not
        class or derived, return false.

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

        PR fortran/88685
        * gfortran.dg/pointer_array_component_3.f90 : New test.


Added:
   
branches/gcc-8-branch/gcc/testsuite/gfortran.dg/pointer_array_component_3.f90
Modified:
    branches/gcc-8-branch/gcc/fortran/expr.c