From 94569e041529eead2209ecd2e04a747dbef262d3 Mon Sep 17 00:00:00 2001
From: Matthias Andreas Benkard <matthias@benkard.de>
Date: Tue, 5 Aug 2008 11:05:10 +0200
Subject: Implement MLKInterpretedClosure#-dealloc.

---
 MLKInterpretedClosure.m | 9 +++++++++
 1 file changed, 9 insertions(+)

(limited to 'MLKInterpretedClosure.m')

diff --git a/MLKInterpretedClosure.m b/MLKInterpretedClosure.m
index 8b2fd9b..fd7fb19 100644
--- a/MLKInterpretedClosure.m
+++ b/MLKInterpretedClosure.m
@@ -85,4 +85,13 @@ static MLKSymbol *PROGN;
 {
   return [NSString stringWithFormat:@"<Interpreted closure @%p>", self];
 }
+
+-(void) dealloc
+{
+  [super dealloc];
+  LDESTROY (bodyForm);
+  LDESTROY (lambdaListName);
+  LDESTROY (context);
+  LDESTROY (environment);
+}
 @end
-- 
cgit v1.2.3