diff options
| author | Daniel Franke <dfranke@gcc.gnu.org> | 2008-03-16 06:05:18 -0400 |
|---|---|---|
| committer | Daniel Franke <dfranke@gcc.gnu.org> | 2008-03-16 06:05:18 -0400 |
| commit | c2339253731ae37f06db11cde631cc476ebf112d (patch) | |
| tree | 97cc00af8deec4a085023c3e72cfd7285cf3fe01 | |
| parent | 38d24731e9946a9e052fe20098bdccadcdd06749 (diff) | |
| download | gcc-c2339253731ae37f06db11cde631cc476ebf112d.zip gcc-c2339253731ae37f06db11cde631cc476ebf112d.tar.gz gcc-c2339253731ae37f06db11cde631cc476ebf112d.tar.bz2 | |
re PR fortran/35582 ([4.1/4.2] very simple error gives segmentation fault)
2008-03-16 Daniel Franke <franke.daniel@gmail.com>
PR fortran/35582
* gfortran.dg/write_invalid_format.f90: New test.
From-SVN: r133270
| -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 + |