diff options
Diffstat (limited to 'MLKInterpreter.m')
| -rw-r--r-- | MLKInterpreter.m | 12 |
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] |