diff options
| -rw-r--r-- | MLKInterpreter.m | 10 |
1 files changed, 7 insertions, 3 deletions
diff --git a/MLKInterpreter.m b/MLKInterpreter.m index 343246c..3cc3431 100644 --- a/MLKInterpreter.m +++ b/MLKInterpreter.m @@ -237,9 +237,13 @@ static MLKSymbol *_LOOP; if (expandOnly) NS_VALUERETURN ([NSArray arrayWithObject: - [MLKCons cons:CATCH - with:[MLKCons cons:catchTag - with:values]]], + [MLKCons + cons:CATCH + with:[MLKCons + cons:catchTag + with:[[values + objectAtIndex:0] + cdr]]]], NSArray *); [MLKDynamicContext popContext]; |