| Index: gcc/gcc/testsuite/gfortran.dg/fmt_cache_1.f
|
| diff --git a/gcc/gcc/testsuite/gfortran.dg/fmt_cache_1.f b/gcc/gcc/testsuite/gfortran.dg/fmt_cache_1.f
|
| index 825b44c11a724f63554734d130899e979c4b14b7..41de3f0d705c903827ebfd2a2c38d2d2ce197575 100644
|
| --- a/gcc/gcc/testsuite/gfortran.dg/fmt_cache_1.f
|
| +++ b/gcc/gcc/testsuite/gfortran.dg/fmt_cache_1.f
|
| @@ -1,11 +1,11 @@
|
| -! { dg-do run { target fd_truncate } }
|
| +! { dg-do run }
|
| ! pr40662 segfaults when specific format is invoked twice.
|
| ! pr40330 incorrect io.
|
| ! test case derived from pr40662, <jvdelisle@gcc.gnu.org>
|
| program astap
|
| character(40) teststring
|
| arlxca = 0.0
|
| - open(10)
|
| + open(10, status="scratch")
|
| write(10,40) arlxca
|
| write(10,40) arlxca
|
| 40 format(t4,"arlxca = ",1pg13.6,t27,"arlxcc = ",g13.6,t53,
|
|
|