From: Janne Blomqvist <jb@gcc.gnu.org>
Date: Tue, 19 Apr 2011 17:57:05 +0000 (+0300)
Subject: Use XDELETEVEC instead of free
X-Git-Url: https://git.libre-soc.org/?a=commitdiff_plain;h=6c13c5f2ac8e8180c45d06e7d4ddd529f61a79b1;p=gcc.git

Use XDELETEVEC instead of free

From-SVN: r172729
---

diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog
index c6d92959eea..b4dabb46ac8 100644
--- a/gcc/fortran/ChangeLog
+++ b/gcc/fortran/ChangeLog
@@ -1,3 +1,8 @@
+2011-04-19  Janne Blomqvist  <jb@gcc.gnu.org>
+
+	* frontend-passes.c (gfc_run_passes): Use XDELETEVEC instead of
+	free.
+
 2011-04-19  Janne Blomqvist  <jb@gcc.gnu.org>
 
 	* misc.c (gfc_getmem): Remove function.
diff --git a/gcc/fortran/frontend-passes.c b/gcc/fortran/frontend-passes.c
index 9d1cc3aac14..d70435dc384 100644
--- a/gcc/fortran/frontend-passes.c
+++ b/gcc/fortran/frontend-passes.c
@@ -71,9 +71,7 @@ gfc_run_passes (gfc_namespace *ns)
       if (gfc_option.dump_fortran_optimized)
 	gfc_dump_parse_tree (ns, stdout);
 
-      /* FIXME: The following should be XDELETEVEC(expr_array);
-      but we cannot do that because it depends on free.  */
-      free (expr_array);
+      XDELETEVEC (expr_array);
     }
 }