summaryrefslogtreecommitdiff
path: root/MLKInterpreter.m
diff options
context:
space:
mode:
authorMatthias Benkard <mulk@minimulk.mst-plus>2008-08-08 19:08:03 +0200
committerMatthias Benkard <mulk@minimulk.mst-plus>2008-08-08 19:08:03 +0200
commit09b354980b8cfc50d01741b5ec433a5bab14ef6e (patch)
treead417a4aaca430ee37a0f571a21134b70a841b4f /MLKInterpreter.m
parentaf415e7e63dc62416cd73a4f146e26e8f3e55c6f (diff)
Fix %FOREIGN-LAMBDA.
Diffstat (limited to 'MLKInterpreter.m')
-rw-r--r--MLKInterpreter.m8
1 files changed, 4 insertions, 4 deletions
diff --git a/MLKInterpreter.m b/MLKInterpreter.m
index b0c38ef..2a85502 100644
--- a/MLKInterpreter.m
+++ b/MLKInterpreter.m
@@ -510,10 +510,10 @@ static MLKSymbol *MULTIPLE_VALUE_CALL;
#endif
#endif
- return LAUTORELEASE ([[MLKForeignProcedure alloc]
- initWithCode:function
- argumentTypes:[argtypes array]
- returnType:returnType]);
+ RETURN_VALUE (LAUTORELEASE ([[MLKForeignProcedure alloc]
+ initWithCode:function
+ argumentTypes:[argtypes array]
+ returnType:returnType]));
}
else if (car == FUNCTION)
{