[Bug fortran/93473] ICE on valid with long module + submodule names

[abensonca at gmail dot com]

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

--- Comment #1 from Andrew Benson <abensonca at gmail dot com> ---
Created attachment 47722
  --> https://gcc.gnu.org/bugzilla/attachment.cgi?id=47722&action=edit
Proposed patch