ref: ed61ae48a570bd279f39480b53f767616a9d43ab
parent: b76bbe37247399331e39bfbbef8724bb2520065d
author: JeffBezanson <[email protected]>
date: Mon Jul 14 21:24:50 EDT 2008
fixing mistake re: dotted arglists in last revision
--- a/femtolisp/flisp.c
+++ b/femtolisp/flisp.c
@@ -1227,7 +1227,7 @@
v = Stack[saveSP] = cdr_(Stack[saveSP]);
}
if (*argsyms != NIL && issymbol(*argsyms)) {
- PUSH(NIL);
+ PUSH(Stack[saveSP]);
// this version uses collective allocation. about 7-10%
// faster for lists with > 2 elements, but uses more
// stack space