From 6efa469caf0146fb6aedb48619c4353d4c624ec4 Mon Sep 17 00:00:00 2001
From: Matthias Benkard <mulk@minimulk.mst-plus>
Date: Mon, 29 Sep 2008 11:12:58 +0200
Subject: APPLY, EVAL: Denullify return values.
---
MLKRoot.m | 4 ++--
1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/MLKRoot.m b/MLKRoot.m
index 596b1e7..7eb9f14 100644
--- a/MLKRoot.m
+++ b/MLKRoot.m
@@ -756,7 +756,7 @@ apply (id *_data, id function, id arglist, id _marker)
? (id)[arglist array]
: (id)[NSArray array])];
- return ([values count] > 0 ? [values objectAtIndex:0] : nil);
+ return ([values count] > 0 ? denullify([values objectAtIndex:0]) : nil);
}
static id
@@ -770,7 +770,7 @@ eval (id *_data, id evaluand, id _marker)
withEnvironment:
[MLKLexicalEnvironment globalEnvironment]];
- return ([values count] > 0 ? [values objectAtIndex:0] : nil);
+ return ([values count] > 0 ? denullify([values objectAtIndex:0]) : nil);
}
static void
--
cgit v1.2.3