fmt_error_7.f: New test.
2009-08-23 Jerry DeLisle <jvdelisle@gcc.gnu.org> * gfortran.dg/fmt_error_7.f: New test. From-SVN: r151044
This commit is contained in:
parent
de1ee8e1ee
commit
a14e5b7e0e
@ -1,3 +1,7 @@
|
||||
2009-08-23 Jerry DeLisle <jvdelisle@gcc.gnu.org>
|
||||
|
||||
* gfortran.dg/fmt_error_7.f: New test.
|
||||
|
||||
2009-08-23 Uros Bizjak <ubizjak@gmail.com>
|
||||
|
||||
PR target/40718
|
||||
|
7
gcc/testsuite/gfortran.dg/fmt_error_7.f
Normal file
7
gcc/testsuite/gfortran.dg/fmt_error_7.f
Normal file
@ -0,0 +1,7 @@
|
||||
! { dg-do compile }
|
||||
! PR37446 Diagnostic of edit descriptors, esp. EN
|
||||
character(40) :: fmt_string
|
||||
write(*, '(1P,2E12.4)') 1.0
|
||||
write(*,'(EN)') 5.0 ! { dg-error "Positive width required" }
|
||||
write(*,'("abcdefg",EN6,"hjjklmnop")') 5.0 ! { dg-error "Period required" }
|
||||
end
|
Loading…
Reference in New Issue
Block a user