From 6b498f0726a38efc7802dad29a47633ad5aed6e7 Mon Sep 17 00:00:00 2001
From: Matthias Andreas Benkard <matthias@benkard.de>
Date: Wed, 2 Jul 2008 14:49:02 +0200
Subject: Interpreter: Implement SET and %FSET.

---
 MLKDynamicContext.m | 5 +++++
 1 file changed, 5 insertions(+)

(limited to 'MLKDynamicContext.m')

diff --git a/MLKDynamicContext.m b/MLKDynamicContext.m
index f0d25b9..4261da3 100644
--- a/MLKDynamicContext.m
+++ b/MLKDynamicContext.m
@@ -381,6 +381,11 @@ static MLKDynamicContext *global_context;
   [[self environment] addBindingForSymbol:symbol];
 }
 
+-(MLKBinding *) bindingForSymbol:(MLKSymbol *)symbol
+{
+  return [[self environment] bindingForSymbol:symbol];
+}
+
 -(BOOL) boundp:(MLKSymbol *)symbol
 {
   return [[self environment] boundp:symbol];
-- 
cgit v1.2.3