From 4e031e7e4079cb653953d091a7b11e9346d7c362 Mon Sep 17 00:00:00 2001 From: Jerry DeLisle Date: Thu, 15 Feb 2007 06:51:42 +0000 Subject: [PATCH] re PR fortran/30779 ([4.1, 4.2 only] incomplete file triggers ICE) 2007-02-15 Jerry DeLisle PR fortran/30779 * gfortran.dg/error_recovery_3.f90: New test. From-SVN: r121983 --- gcc/testsuite/ChangeLog | 5 +++++ gcc/testsuite/gfortran.dg/error_recovery_3.f90 | 9 +++++++++ 2 files changed, 14 insertions(+) create mode 100644 gcc/testsuite/gfortran.dg/error_recovery_3.f90 diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog index bd936c06241..68dac0a3460 100644 --- a/gcc/testsuite/ChangeLog +++ b/gcc/testsuite/ChangeLog @@ -1,3 +1,8 @@ +2007-02-15 Jerry DeLisle + + PR fortran/30779 + * gfortran.dg/error_recovery_3.f90: New test. + 2007-02-15 Alexandre Oliva * g++.dg/tree-ssa/sra-1.C: New. diff --git a/gcc/testsuite/gfortran.dg/error_recovery_3.f90 b/gcc/testsuite/gfortran.dg/error_recovery_3.f90 new file mode 100644 index 00000000000..d0ec20500d3 --- /dev/null +++ b/gcc/testsuite/gfortran.dg/error_recovery_3.f90 @@ -0,0 +1,9 @@ +! { dg-do compile } +! PR30779 incomplete file triggers ICE. +! Note: This file is deliberately cut short to verify a graceful exit. Before +! the patch this gave ICE. +MODULE M1 + INTEGER :: I +END MODULE M1 + +USE M1, ONLY: I,&! { dg-error "Missing" } \ No newline at end of file -- 2.30.2