From 5e390e4e4485b8595e29331b134f73f91174185b Mon Sep 17 00:00:00 2001 From: jvdelisle Date: Wed, 5 Jan 2011 04:18:39 +0000 Subject: [PATCH] 2011-01-04 Jerry DeLisle PR libgfortran/47154 * gfortran.dg/namelist_68.f90: New test. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@168503 138bc75d-0d04-0410-961f-82ee72b054a4 --- gcc/testsuite/ChangeLog | 5 +++++ gcc/testsuite/gfortran.dg/namelist_68.f90 | 9 +++++++++ 2 files changed, 14 insertions(+) create mode 100644 gcc/testsuite/gfortran.dg/namelist_68.f90 diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog index 7ee893e..fbe37bd 100644 --- a/gcc/testsuite/ChangeLog +++ b/gcc/testsuite/ChangeLog @@ -1,3 +1,8 @@ +2011-01-04 Jerry DeLisle + + PR libgfortran/47154 + * gfortran.dg/namelist_68.f90: New test. + 2011-01-04 Eric Botcazou * gnat.dg/unchecked_convert8.ad[sb]: New test. diff --git a/gcc/testsuite/gfortran.dg/namelist_68.f90 b/gcc/testsuite/gfortran.dg/namelist_68.f90 new file mode 100644 index 0000000..903f9fb --- /dev/null +++ b/gcc/testsuite/gfortran.dg/namelist_68.f90 @@ -0,0 +1,9 @@ +! { dg-do run } +! PR47154 END= does not work in namelist read + program foo + real :: a + namelist /b/a + open(10,status="scratch") + read (10,nml=b,end=100) + 100 continue + end -- 2.7.4