From: Janus Weil Date: Wed, 7 Sep 2011 13:31:04 +0000 (+0200) Subject: re PR fortran/50288 (FAIL: gfortran.dg/class_45b.f03) X-Git-Url: https://git.libre-soc.org/?a=commitdiff_plain;h=b7b1babae9578b47dfcbae36164d3da72dd17525;p=gcc.git re PR fortran/50288 (FAIL: gfortran.dg/class_45b.f03) 2011-09-07 Janus Weil PR fortran/50288 * gfortran.dg/class_4c.f03: Modified ("dg-do link" and "dg-final"). * gfortran.dg/class_4d.f03: Deleted. * gfortran.dg/class_45b.f03: Modififed ("dg-do link"). From-SVN: r178635 --- diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog index 82b748f476a..322f81738a9 100644 --- a/gcc/testsuite/ChangeLog +++ b/gcc/testsuite/ChangeLog @@ -1,3 +1,10 @@ +2011-09-07 Janus Weil + + PR fortran/50288 + * gfortran.dg/class_4c.f03: Modified ("dg-do link" and "dg-final"). + * gfortran.dg/class_4d.f03: Deleted. + * gfortran.dg/class_45b.f03: Modififed ("dg-do link"). + 2011-09-07 Richard Guenther * gcc.dg/tree-ssa/forwprop-16.c: New testcase. diff --git a/gcc/testsuite/gfortran.dg/class_45b.f03 b/gcc/testsuite/gfortran.dg/class_45b.f03 index e37fa96d3c2..ed0d67435c1 100644 --- a/gcc/testsuite/gfortran.dg/class_45b.f03 +++ b/gcc/testsuite/gfortran.dg/class_45b.f03 @@ -1,4 +1,4 @@ -! { dg-do run } +! { dg-do link } ! { dg-additional-sources class_45a.f03 } ! ! PR 50227: [4.7 Regression] [OOP] ICE-on-valid with allocatable class variable diff --git a/gcc/testsuite/gfortran.dg/class_4c.f03 b/gcc/testsuite/gfortran.dg/class_4c.f03 index c76b3ab6953..c28a32b0fca 100644 --- a/gcc/testsuite/gfortran.dg/class_4c.f03 +++ b/gcc/testsuite/gfortran.dg/class_4c.f03 @@ -1,11 +1,11 @@ -! { dg-do run } +! { dg-do link } ! { dg-additional-sources class_4a.f03 class_4b.f03 } ! ! Test the fix for PR41583, in which the different source files ! would generate the same 'vindex' for different class declared ! types. ! -! The test comprises class_4a, class_4b class_4c and class_4d.f03 +! The test comprises class_4a, class_4b and class_4c.f03 ! ! Contributed by Tobias Burnus ! @@ -27,3 +27,5 @@ end select print *, i end + +! { dg-final { cleanup-modules "m m2 m3" } } diff --git a/gcc/testsuite/gfortran.dg/class_4d.f03 b/gcc/testsuite/gfortran.dg/class_4d.f03 deleted file mode 100644 index 80934b6c125..00000000000 --- a/gcc/testsuite/gfortran.dg/class_4d.f03 +++ /dev/null @@ -1,15 +0,0 @@ -! { dg-do compile } -! -! Test the fix for PR41583, in which the different source files -! would generate the same 'vindex' for different class declared -! types. -! -! This file does nothing other than clean up the modules. -! -! Contributed by Tobias Burnus -! -module m3 - type t - end type t -end module m3 -! { dg-final { cleanup-modules "m m2 m3" } }