https://gcc.gnu.org/bugzilla/show_bug.cgi?id=25829
--- Comment #39 from Jerry DeLisle <jvdelisle at gcc dot gnu.org> ---
Per definition in ioparm.def in frontend:
IOPARM (wait, id, 1 << 7, pint4)
id should be a pointer to an integer kind=4.
This means:
> typedef struct
> {
> st_parameter_common common;
> GFC_IO_INT id;
> }
> st_parameter_wait;
should be:
typedef struct
{
st_parameter_common common;
GFC_INTEGER_4 *id;
}
st_parameter_wait;
