summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorMatthias Andreas Benkard <matthias@benkard.de>2008-08-27 23:37:23 +0200
committerMatthias Andreas Benkard <matthias@benkard.de>2008-08-27 23:40:34 +0200
commitb9dc0da4d67d191a2f9ae23ed2f1557452b42669 (patch)
tree677dcbf4f04007f52bb1093d68e8bdd5723da393
parent623a9f82ae7c92e76431ee88fea8d3054f6f926c (diff)
RPLACA, RPLACD: Return the modified cons instead of NIL.
-rw-r--r--MLKRoot.m4
1 files changed, 2 insertions, 2 deletions
diff --git a/MLKRoot.m b/MLKRoot.m
index dd5b22a..1efd024 100644
--- a/MLKRoot.m
+++ b/MLKRoot.m
@@ -75,14 +75,14 @@ static id
rplaca (id _data, id cons, id value, id _marker)
{
[cons setCar:value];
- return nil;
+ return cons;
}
static id
rplacd (id _data, id cons, id value, id _marker)
{
[cons setCdr:value];
- return nil;
+ return cons;
}
static id