From: Tobias Burnus <burnus@net-b.de>
Date: Mon, 22 Jul 2013 17:02:26 +0000 (+0200)
Subject: re PR fortran/57762 (Memory leak in gfortran.dg/class_array_7.f03 after revision... 
X-Git-Url: https://git.libre-soc.org/?a=commitdiff_plain;h=4563cfecbb37d1ee2ea4ae8cdbeafc18dde02355;p=gcc.git

re PR fortran/57762 (Memory leak in gfortran.dg/class_array_7.f03 after revision 200084)

2013-07-22  Tobias Burnus  <burnus@net-b.de>

        PR fortran/57762
        * gfortran.dg/class_array_7.f03: Fix memory leak.

From-SVN: r201137
---

diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog
index 327018fdd92..5b167b2a891 100644
--- a/gcc/testsuite/ChangeLog
+++ b/gcc/testsuite/ChangeLog
@@ -1,3 +1,8 @@
+2013-07-22  Tobias Burnus  <burnus@net-b.de>
+
+	PR fortran/57762
+	* gfortran.dg/class_array_7.f03: Fix memory leak.
+
 2013-07-22  Paolo Carlini  <paolo.carlini@oracle.com>
 
 	PR c++/52816
diff --git a/gcc/testsuite/gfortran.dg/class_array_7.f03 b/gcc/testsuite/gfortran.dg/class_array_7.f03
index 435e6f52ee6..5c9673ff72b 100644
--- a/gcc/testsuite/gfortran.dg/class_array_7.f03
+++ b/gcc/testsuite/gfortran.dg/class_array_7.f03
@@ -54,4 +54,5 @@ program main
   if (trim (print_type ("a", a)) .ne. "a is extended_type") call abort
   call reallocate (a)
   if (trim (print_type ("a", a)) .ne. "a is base_type") call abort
+  deallocate (a)
 end program main