summaryrefslogtreecommitdiff
path: root/MLKDynamicContext.m
diff options
context:
space:
mode:
Diffstat (limited to 'MLKDynamicContext.m')
-rw-r--r--MLKDynamicContext.m22
1 files changed, 22 insertions, 0 deletions
diff --git a/MLKDynamicContext.m b/MLKDynamicContext.m
index cf6b861..c034eac 100644
--- a/MLKDynamicContext.m
+++ b/MLKDynamicContext.m
@@ -79,6 +79,28 @@
return context;
}
+-(MLKEnvironment *) environment
+{
+ return _environment;
+}
+
+-(id) findRestart:(MLKSymbol *)symbol
+{
+ return [_restarts valueForBinding:symbol];
+}
+
+/*
+-(id) findHandler:(MLKSymbol *)symbol
+{
+ // ???
+}
+*/
+
+-(id) findCatchTag:(MLKSymbol *)symbol
+{
+ return [_catchTags valueForBinding:symbol];
+}
+
-(void) dealloc
{
RELEASE (_conditionHandlers);