From 6efc56edbea899b0836781c873dffe52e86e97e5 Mon Sep 17 00:00:00 2001 From: Jerry DeLisle Date: Mon, 14 Jul 2008 01:02:05 +0000 Subject: [PATCH] re PR fortran/36725 (g0 edit descriptor: Missing compile-time checking for invalid g0.d) 2008-07-14 Jerry DeLisle PR fortran/36725 gfortran.dg/fmt_go_4.f08: New test. From-SVN: r137770 --- gcc/testsuite/ChangeLog | 7 ++++++- gcc/testsuite/gfortran.dg/fmt_g0_4.f08 | 5 +++++ 2 files changed, 11 insertions(+), 1 deletion(-) create mode 100644 gcc/testsuite/gfortran.dg/fmt_g0_4.f08 diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog index 2f20e5b9295..dd05af11506 100644 --- a/gcc/testsuite/ChangeLog +++ b/gcc/testsuite/ChangeLog @@ -1,9 +1,14 @@ +2008-07-14 Jerry DeLisle + + PR fortran/36725 + gfortran.dg/fmt_go_4.f08: New test. + 2008-07-14 Hans-Peter Nilsson PR target/35492 * gcc.c-torture/compile/pr35492.c: New test. -2008-06-22 Daniel Kraft +2008-07-12 Daniel Kraft * gfortran.dg/used_types_21.f90: New test. diff --git a/gcc/testsuite/gfortran.dg/fmt_g0_4.f08 b/gcc/testsuite/gfortran.dg/fmt_g0_4.f08 new file mode 100644 index 00000000000..149b1aa400a --- /dev/null +++ b/gcc/testsuite/gfortran.dg/fmt_g0_4.f08 @@ -0,0 +1,5 @@ +! { dg-do compile } +! { dg-options "-std=f2008" } +! PR36725 Compile time error for g0 edit descriptor +print '(g0.9)', 0.1 ! { dg-error "Specifying precision" } +end -- 2.30.2