[Patch, Fortran, committed] Fix PR54467 (TBP ICEs due to _final wrapper disabling)

Dominique Dhumieres dominiq@lps.ens.fr
Mon Sep 3 22:20:00 GMT 2012


Hi Tobias,

The lines 6 and 12 of gfortran.dg/coarray_poly_3.f90 need some adjustment
along the line:

--- /opt/gcc/_clean/gcc/testsuite/gfortran.dg/coarray_poly_3.f90	2011-12-19 09:58:21.000000000 +0100
+++ /opt/gcc/work/gcc/testsuite/gfortran.dg/coarray_poly_3.f90	2012-09-03 22:13:09.000000000 +0200
@@ -3,13 +3,13 @@
 !
 
 
-subroutine cont1(x) ! { dg-error "has the CONTIGUOUS attribute but is not an array pointer or an assumed-shape array" }
+subroutine cont1(x) ! { dg-error "has the CONTIGUOUS attribute but is not an array pointer or an assumed-shape or assumed-rank array" }
   type t
   end type t
   class(t), contiguous, allocatable :: x(:)
 end
 
-subroutine cont2(x) ! { dg-error "has the CONTIGUOUS attribute but is not an array pointer or an assumed-shape array" }
+subroutine cont2(x) ! { dg-error "has the CONTIGUOUS attribute but is not an array pointer or an assumed-shape or assumed-rank array" }
   type t
   end type t
   class(t), contiguous, allocatable :: x(:)[:]

TIA

Dominique



More information about the Fortran mailing list