From 22dc528bcebd30bd8a274fca0d7d728e917c7ec2 Mon Sep 17 00:00:00 2001
From: Matthias Andreas Benkard <matthias@benkard.de>
Date: Sun, 17 Aug 2008 11:38:09 +0200
Subject: MLKForm class cluster: Add a couple of accessors to forms that are
 only processed indirectly.

---
 MLKForm.h | 8 ++++++++
 1 file changed, 8 insertions(+)

(limited to 'MLKForm.h')

diff --git a/MLKForm.h b/MLKForm.h
index 29483ef..ac08241 100644
--- a/MLKForm.h
+++ b/MLKForm.h
@@ -91,6 +91,7 @@
 {
   id _body;
   NSArray *_bodyForms;
+  id _bodyContext;
 }
 
 -(void) splitDeclarationsAndBody:(id)object;
@@ -319,6 +320,10 @@
 }
 
 +(Class) dispatchClassForObject:(id)object;
+
+-(id) name;
+-(id) lambdaListName;
+-(id) bodyForms;
 @end
 
 
@@ -329,6 +334,9 @@
 }
 
 +(Class) dispatchClassForObject:(id)object;
+
+-(id) name;
+-(id) valueForm;
 @end
 
 
-- 
cgit v1.2.3