summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--MLKInterpreter.m12
1 files changed, 6 insertions, 6 deletions
diff --git a/MLKInterpreter.m b/MLKInterpreter.m
index 3cc3431..9ccc079 100644
--- a/MLKInterpreter.m
+++ b/MLKInterpreter.m
@@ -210,14 +210,14 @@ static MLKSymbol *_LOOP;
NSArray *values;
MLKDynamicContext *newctx;
+ catchTag = [[self eval:[[program cdr] car]
+ inLexicalContext:context
+ withEnvironment:lexenv
+ expandOnly:expandOnly]
+ objectAtIndex:0];
+
NS_DURING
{
- catchTag = [[self eval:[[program cdr] car]
- inLexicalContext:context
- withEnvironment:lexenv
- expandOnly:expandOnly]
- objectAtIndex:0];
-
if (!expandOnly)
{
newctx = [[MLKDynamicContext alloc]