]> git.ipfire.org Git - thirdparty/gcc.git/commitdiff
Fortran: Allow BLANK= in OPEN with -std=f95
authorJerry DeLisle <jvdelisle@gcc.gnu.org>
Tue, 6 Jan 2026 22:47:49 +0000 (14:47 -0800)
committerJerry DeLisle <jvdelisle@gcc.gnu.org>
Tue, 6 Jan 2026 22:47:49 +0000 (14:47 -0800)
PR fortran/123029

gcc/fortran/ChangeLog:

* io.cc (check_open_constraints): Delete erroneous check.

gcc/fortran/io.cc

index 284a8f4187cecaff43cb20efad7b8c400c8b8542..5bffed22eb8f26d590201357a44d9af5f15d4676 100644 (file)
@@ -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 };