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

Jerry DeLisle <jvdelisle at gcc dot gnu.org> changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
             Status|UNCONFIRMED                 |NEW
     Ever confirmed|0                           |1
   Last reconfirmed|                            |2025-12-06

--- Comment #2 from Jerry DeLisle <jvdelisle at gcc dot gnu.org> ---
Fix (untested)

$ git diff io.cc
diff --git a/gcc/fortran/io.cc b/gcc/fortran/io.cc
index 45cac5ee572..92b001b9231 100644
--- a/gcc/fortran/io.cc
+++ b/gcc/fortran/io.cc
@@ -2247,10 +2247,6 @@ check_open_constraints (gfc_open *open, locus *where)
   /* Checks on the BLANK specifier.  */
   if (open->blank)
     {
-      if (!gfc_notify_std (GFC_STD_F2003, "BLANK= at %L "
-                          "not allowed in Fortran 95", &open->blank->where))
-       return false;
-
       if (open->blank->expr_type == EXPR_CONSTANT)
        {
          static const char *blank[] = { "ZERO", "NULL", NULL };

Reply via email to