From f632ef49a7d5465943ac7ac7c666c0490887caad Mon Sep 17 00:00:00 2001
From: Matthias Andreas Benkard <matthias@benkard.de>
Date: Wed, 13 Aug 2008 00:43:48 +0200
Subject: Revert "MLKCompiledClosure: Always indirect through a function
 pointer before doing a call."

This reverts commit dfe50b2e72ddbd0148870748975f00e7fc662314.
---
 MLKCompiledClosure.h | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

(limited to 'MLKCompiledClosure.h')

diff --git a/MLKCompiledClosure.h b/MLKCompiledClosure.h
index 589c0de..7df6c68 100644
--- a/MLKCompiledClosure.h
+++ b/MLKCompiledClosure.h
@@ -27,9 +27,8 @@
 @interface MLKCompiledClosure : NSObject <MLKFuncallable>
 {
   int _dataLength;
-  id (**_code)();
+  id (*_code)();
   id *_data;
-  BOOL _ownPointer;  // do we own the _code pointer cell?
 }
 
 // Why intptr_t?  Because it makes it easier to call this method from
-- 
cgit v1.2.3


From 79abb06fbce7ee8f72556ededeee3eb88baf2fc8 Mon Sep 17 00:00:00 2001
From: Matthias Andreas Benkard <matthias@benkard.de>
Date: Sat, 16 Aug 2008 18:42:30 +0200
Subject: MLKCompiledClosure: Add accessors.

---
 MLKCompiledClosure.h | 3 +++
 1 file changed, 3 insertions(+)

(limited to 'MLKCompiledClosure.h')

diff --git a/MLKCompiledClosure.h b/MLKCompiledClosure.h
index 7df6c68..772f29c 100644
--- a/MLKCompiledClosure.h
+++ b/MLKCompiledClosure.h
@@ -46,5 +46,8 @@
 -(NSString *) description;
 -(NSString *) descriptionForLisp;
 
+-(id (*)()) code;
+-(void *) closureData;
+
 -(void) dealloc;
 @end
-- 
cgit v1.2.3