Patchwork [Fortran] PR57456 - Handle ALLOCATE with typespec for CLASS

login
register
mail settings
Submitter Tobias Burnus
Date June 1, 2013, 8:34 a.m.
Message ID <51A9B233.4070008@net-b.de>
Download mbox | patch
Permalink /patch/248067/
State New
Headers show

Comments

Tobias Burnus - June 1, 2013, 8:34 a.m.
Dominique Dhumieres wrote:
> As written the test in gfortran.dg/class_array_17.f90 is a no-op

Well spotted! Thanks for the report. I have committed the attached patch 
as obvious, Rev. 199573.

Tobias

PS: I realized that I should have put your name in the ChangeLog as you 
found and patched the issue.

Patch

Index: gcc/testsuite/ChangeLog
===================================================================
--- gcc/testsuite/ChangeLog	(Revision 199560)
+++ gcc/testsuite/ChangeLog	(Arbeitskopie)
@@ -1,3 +1,8 @@ 
+2013-06-01  Tobias Burnus  <burnus@net-b.de>
+
+	PR fortran/57456
+	* gfortran.dg/class_array_17.f90: New.
+
 2013-05-31  Eric Botcazou  <ebotcazou@adacore.com>
 
 	* ada/acats/floatstore.lst: New.
Index: gcc/testsuite/gfortran.dg/class_array_17.f90
===================================================================
--- gcc/testsuite/gfortran.dg/class_array_17.f90	(Revision 199560)
+++ gcc/testsuite/gfortran.dg/class_array_17.f90	(Arbeitskopie)
@@ -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" } }