Index: gcc/gcc/testsuite/gfortran.dg/assumed_charlen_function_4.f90 |
diff --git a/gcc/gcc/testsuite/gfortran.dg/assumed_charlen_function_4.f90 b/gcc/gcc/testsuite/gfortran.dg/assumed_charlen_function_4.f90 |
index 9c96ba4d69fa705a9395fb3abcd76ffd64fb5124..c8f804465b7c5da676e08be1a49fb29205ade0d8 100644 |
--- a/gcc/gcc/testsuite/gfortran.dg/assumed_charlen_function_4.f90 |
+++ b/gcc/gcc/testsuite/gfortran.dg/assumed_charlen_function_4.f90 |
@@ -1,4 +1,6 @@ |
! { dg-do compile } |
+! { dg-options "-std=legacy" } |
+! |
! Tests the fix for PR28600 in which the declaration for the |
! character length n, would be given the DECL_CONTEXT of 'gee' |
! thus causing an ICE. |