[Patch, Fortran] PR57456 - Handle ALLOCATE with typespec for CLASS

Dominique Dhumieres dominiq@lps.ens.fr
Sat Jun 1 06:41:00 GMT 2013


Dear Tobias,

As written the test in gfortran.dg/class_array_17.f90 is a no-op
and should be replaced with something such as

--- ../_clean/gcc/testsuite/gfortran.dg/class_array_17.f90	2013-05-31 14:07:26.000000000 +0200
+++ gcc/testsuite/gfortran.dg/class_array_17.f90	2013-05-31 14:33:45.000000000 +0200
@@ -30,5 +30,5 @@ program test
   deallocate(y)
 end
 
-! { dg-final { scan-tree-dump-times "__builtin_malloc (40);" 0 "original" } }
+! { dg-final { scan-tree-dump-times "__builtin_malloc .40.;" 1 "original" } }
 ! { dg-final { cleanup-tree-dump "original" } }

The parentheses in the regexp are not supposed to match those in the dump file.
Not that a better fix would be to escape the parentheses with the right number
of \, but I never remember how many of them are needed.

TIA

Dominique



More information about the Fortran mailing list