https://gcc.gnu.org/bugzilla/show_bug.cgi?id=93234
Jerry DeLisle <jvdelisle at gcc dot gnu.org> changed: What |Removed |Added ---------------------------------------------------------------------------- Status|UNCONFIRMED |NEW Last reconfirmed| |2020-01-13 CC| |jvdelisle at gcc dot gnu.org Ever confirmed|0 |1 --- Comment #1 from Jerry DeLisle <jvdelisle at gcc dot gnu.org> --- The enumerators in inquire.c do not match those set in unit.c. Something like this is needed. diff --git a/libgfortran/io/inquire.c b/libgfortran/io/inquire.c index e6b22eb0b33..62aca71a162 100644 --- a/libgfortran/io/inquire.c +++ b/libgfortran/io/inquire.c @@ -371,7 +371,7 @@ inquire_via_unit (st_parameter_inquire *iqp, gfc_unit *u) else switch (u->flags.sign) { - case SIGN_PROCDEFINED: + case SIGN_UNSPECIFIED: p = "PROCESSOR_DEFINED"; break; case SIGN_SUPPRESS: @@ -409,7 +409,7 @@ inquire_via_unit (st_parameter_inquire *iqp, gfc_unit *u) case ROUND_COMPATIBLE: p = "COMPATIBLE"; break; - case ROUND_PROCDEFINED: + case ROUND_UNSPECIFIED: p = "PROCESSOR_DEFINED"; break; default: I wonder if they are off for any others?