Index: gcc/gcc/testsuite/gfortran.dg/open-options-blanks.f |
diff --git a/gcc/gcc/testsuite/gfortran.dg/open-options-blanks.f b/gcc/gcc/testsuite/gfortran.dg/open-options-blanks.f |
index 8f5faa416297527b7af0b4b38cc44b57f86af3dc..4db31b9e31a2a07e7f186c16f6d2572bc270111b 100644 |
--- a/gcc/gcc/testsuite/gfortran.dg/open-options-blanks.f |
+++ b/gcc/gcc/testsuite/gfortran.dg/open-options-blanks.f |
@@ -1,4 +1,6 @@ |
! { dg-do run } |
+! { dg-options "-std=legacy" } |
+! |
! PR 20163, first half: Trailing blanks on an option to |
! open used to cause an error |
CHARACTER*8 ST |