summaryrefslogtreecommitdiff
path: root/MLKForm.h
diff options
context:
space:
mode:
authorMatthias Benkard <mulk@minimulk.mst-plus>2008-08-11 01:00:09 +0200
committerMatthias Benkard <mulk@minimulk.mst-plus>2008-08-11 01:00:09 +0200
commit065ea00d5c861411b5aaa41f29bd69a9f30e3ef3 (patch)
tree4d73d1305c8ae8031f5091d38b0c36f526c99f2a /MLKForm.h
parentb3be10fa461a52b3ca774ad2a25162d0fc830cda (diff)
Implement most of the MLKForm class cluster.
Diffstat (limited to 'MLKForm.h')
-rw-r--r--MLKForm.h26
1 files changed, 21 insertions, 5 deletions
diff --git a/MLKForm.h b/MLKForm.h
index b918703..4dd9580 100644
--- a/MLKForm.h
+++ b/MLKForm.h
@@ -124,6 +124,7 @@
@interface MLKSimpleDefmacroForm : MLKDeclaringForm
{
+ MLKSymbol *_lambdaListName;
MLKSymbol *_name;
}
@end
@@ -219,14 +220,17 @@
@end
+@interface MLKLocallyForm : MLKDeclaringForm
+@end
+
+
@interface MLKSimpleLoopForm : MLKCompoundForm
@end
-@interface MLKMultipleValueCallForm : MLKCompoundForm
+@interface MLKMultipleValueCallForm : MLKBodyForm
{
id _functionForm;
- NSArray *_subforms;
}
@end
@@ -245,14 +249,14 @@
@interface MLKQuoteForm : MLKCompoundForm
{
- MLKForm *_quotedForm;
+ id _quotedData;
}
@end
@interface MLKSetQForm : MLKCompoundForm
{
- NSArray *_variableForms;
+ NSArray *_variables;
NSArray *_valueForms;
}
@end
@@ -260,7 +264,7 @@
@interface MLKFSetQForm : MLKCompoundForm
{
- NSArray *_functionNameForms;
+ NSArray *_functionNames;
NSArray *_valueForms;
}
@end
@@ -295,3 +299,15 @@
MLKForm *_protectedForm;
}
@end
+
+
+@interface MLKSimpleFunctionBindingForm : MLKDocstringForm
+{
+ id _name;
+ MLKSymbol *_lambdaListName;
+}
+
++(id) formWithObject:(id)object
+ inContext:(MLKLexicalContext *)context
+ forCompiler:(id)compiler;
+@end