[Bug fortran/47191] Misleading error message if part-ref starts with DATA

[dominiq at lps dot ens.fr]

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

Dominique d'Humieres <dominiq at lps dot ens.fr> changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
           Priority|P3                          |P5
           Severity|normal                      |enhancement

--- Comment #2 from Dominique d'Humieres <dominiq at lps dot ens.fr> ---
Compiling the following code

module library
  implicit none
  type parameters
    private
    integer :: steps
   !real    :: result
  end type parameters
contains
  subroutine set_parameters (datos, steps)
    type (parameters)    :: datos
    integer, intent (in) :: steps
    datos % steps  = steps
    datos % result = 0.0
  end subroutine set_parameters
end module library

gives the error

     datos % result = 0.0
                  1

Error: 'result' at (1) is not a member of the 'parameters' structure