[Bug fortran/67170] PRE can't hoist out a readonly argument

[mliska at suse dot cz]

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

--- Comment #1 from Martin Liška <mliska at suse dot cz> ---
Created attachment 36160
  --> https://gcc.gnu.org/bugzilla/attachment.cgi?id=36160&action=edit
Test case