summaryrefslogtreecommitdiff
path: root/MLKRoot.m
diff options
context:
space:
mode:
authorMatthias Andreas Benkard <matthias@benkard.de>2008-10-01 19:40:42 +0200
committerMatthias Andreas Benkard <matthias@benkard.de>2008-10-01 19:40:42 +0200
commitafaaec406bc86bf52ef976634b458dbc7e01fdc9 (patch)
treece715c4b8fb6cbe95c4e2e80fc85af6706acfb44 /MLKRoot.m
parentfd7702e9b009d2984328b2519db946f82ad834e9 (diff)
parenta0dae1a2756c0f9a84c3a258f3a4a05e63afc1c6 (diff)
Merge mulk_benkard@ssh.phx.nearlyfreespeech.net:/home/htdocs/code/mulklisp
Diffstat (limited to 'MLKRoot.m')
-rw-r--r--MLKRoot.m4
1 files changed, 2 insertions, 2 deletions
diff --git a/MLKRoot.m b/MLKRoot.m
index 4faf364..f85ef16 100644
--- a/MLKRoot.m
+++ b/MLKRoot.m
@@ -760,7 +760,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
@@ -774,7 +774,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