From ed12b7043fa98928f75c289a756fbcef546315f8 Mon Sep 17 00:00:00 2001
From: Ian Lynagh <igloo@earth.li>
Date: Fri, 15 Dec 2006 21:44:30 +0000
Subject: Free more things that we allocate

---
 rts/Profiling.c | 6 ++++++
 1 file changed, 6 insertions(+)

(limited to 'rts/Profiling.c')

diff --git a/rts/Profiling.c b/rts/Profiling.c
index a8650788e9..4e759b6942 100644
--- a/rts/Profiling.c
+++ b/rts/Profiling.c
@@ -185,6 +185,12 @@ initProfiling1 (void)
    */
 }
 
+void
+freeProfiling1 (void)
+{
+    arenaFree(prof_arena);
+}
+
 void
 initProfiling2 (void)
 {
-- 
cgit v1.2.1