https://gcc.gnu.org/bugzilla/show_bug.cgi?id=85506
kargl at gcc dot gnu.org changed:
What |Removed |Added
----------------------------------------------------------------------------
Status|NEW |RESOLVED
Resolution|--- |FIXED
Assignee|unassigned at gcc dot gnu.org |kargl at gcc dot gnu.org
Target Milestone|8.4 |9.2
--- Comment #5 from kargl at gcc dot gnu.org ---
This seems to have been fixed.
gfcx -c a.f90
a.f90:6:11:
6 | data z%n / 3 /
| 1
Error: part-ref with pointer attribute near (1) is not rightmost part-ref of
data-stmt-object
Investigation shows
r267820 | kargl | 2019-01-10 10:45:38 -0800 (Thu, 10 Jan 2019) | 13 lines
2019-01-10 Steven G. Kargl <ka...@gcc.gnu.org>
PR fortran/86322
* decl.c (top_var_list): Set locus of expr.
(gfc_match_data): Detect pointer on non-rightmost part-refs.
2019-01-10 Steven G. Kargl <ka...@gcc.gnu.org>
PR fortran/86322
* gfortran.dg/pr86322_1.f90: New test.
* gfortran.dg/pr86322_2.f90: Ditto.
* gfortran.dg/pr86322_3.f90: Ditto.
