https://gcc.gnu.org/bugzilla/show_bug.cgi?id=125383
--- Comment #2 from Harald Anlauf <anlauf at gcc dot gnu.org> ---
Observation: replacing
if (present(parg)) call parg
by an unprotected call
call parg
seems to "resolve" the problem.
