diff options
-rw-r--r-- | gcc/testsuite/ChangeLog | 11 | ||||
-rw-r--r-- | gcc/testsuite/gfortran.dg/write_invalid_format.f90 | 9 |
2 files changed, 17 insertions, 3 deletions
diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog index da901b2..7bb0108 100644 --- a/gcc/testsuite/ChangeLog +++ b/gcc/testsuite/ChangeLog @@ -1,3 +1,8 @@ +2008-03-16 Daniel Franke <franke.daniel@gmail.com> + + PR fortran/35582 + * gfortran.dg/write_invalid_format.f90: New test. + 2008-03-15 Richard Guenther <rguenther@suse.de> * gcc.dg/tree-ssa/ssa-ccp-16.c: New testcase. @@ -5,7 +10,7 @@ 2008-03-15 Jerry DeLisle <jvdelisle@gcc.gnu.org> PR testsuite/35184 - gfortran.dg/elemental_subroutine_6.f90: New test. + * gfortran.dg/elemental_subroutine_6.f90: New test. 2008-03-15 Richard Guenther <rguenther@suse.de> @@ -21,7 +26,7 @@ 2008-03-15 Jerry DeLisle <jvdelisle@gcc.gnu.org> PR testsuite/35478 - gfortran.dg/generic_16.f90: New test. + * gfortran.dg/generic_16.f90: New test. 2008-03-15 Hans-Peter Nilsson <hp@axis.com> @@ -31,7 +36,7 @@ 2008-03-14 Jerry DeLisle <jvdelisle@gcc.gnu.org> PR testsuite/33296 - gfortran.dg/nearest_4.f90: New test. + * gfortran.dg/nearest_4.f90: New test. 2008-03-14 Richard Guenther <rguenther@suse.de> diff --git a/gcc/testsuite/gfortran.dg/write_invalid_format.f90 b/gcc/testsuite/gfortran.dg/write_invalid_format.f90 new file mode 100644 index 0000000..fb60313 --- /dev/null +++ b/gcc/testsuite/gfortran.dg/write_invalid_format.f90 @@ -0,0 +1,9 @@ +! { dg-do "compile" } +! PR fortran/35582 - ICE on invalid format +! Testcase contributed by +! Leandro Martinez <leandromartinez DOT spam AT gmail DOT com> + + real, parameter :: a = 1. + write(*,a) 'test' ! { dg-error "expression in FORMAT tag" } +end + |