From 03f8b9a2dd1a41baee46fd82e07545ad7c10986d Mon Sep 17 00:00:00 2001
From: Matthias Benkard <mulk@Minimulk.local>
Date: Sun, 24 Aug 2008 18:07:16 +0200
Subject: MLKInterpretedClosure: Adapt to the new interpreter.

---
 MLKForm.m | 6 ++++++
 1 file changed, 6 insertions(+)

(limited to 'MLKForm.m')

diff --git a/MLKForm.m b/MLKForm.m
index 16ab207..024ac2d 100644
--- a/MLKForm.m
+++ b/MLKForm.m
@@ -215,6 +215,7 @@
                                  [NSArray arrayWithObjects:
                                             _form, context, nil]]
                               objectAtIndex:0]);
+  //NSLog (@"=> %@", MLKPrintToString (expansion));
 
   return LRETAIN ([MLKForm formWithObject:expansion
                            inContext:context
@@ -483,6 +484,11 @@
           inContext:newContext];
   return self;
 }
+
+-(MLKSymbol *) lambdaListName
+{
+  return _lambdaListName;
+}
 @end
 
 
-- 
cgit v1.2.3