[Bug fortran/93308] bind(c) subroutine changes lower bound of array argument in caller

[jrfsousa at gcc dot gnu.org]

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

--- Comment #7 from José Rui Faustino de Sousa <jrfsousa at gcc dot gnu.org> ---
Created attachment 51014
  --> https://gcc.gnu.org/bugzilla/attachment.cgi?id=51014&action=edit
Updated patch.