lassik
/
upscheme
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

fixing mistake re: dotted arglists in last revision

This commit is contained in:
JeffBezanson 2008-07-15 01:24:50 +00:00
parent b76bbe3724
commit ed61ae48a5
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
femtolisp/flisp.c
View File

@ -1227,7 +1227,7 @@ static value_t eval_sexpr(value_t e, value_t *penv, int tail)
v = Stack[saveSP] = cdr_(Stack[saveSP]); v = Stack[saveSP] = cdr_(Stack[saveSP]);
} }
if (*argsyms != NIL && issymbol(*argsyms)) { if (*argsyms != NIL && issymbol(*argsyms)) {
PUSH(NIL); PUSH(Stack[saveSP]);
// this version uses collective allocation. about 7-10% // this version uses collective allocation. about 7-10%
// faster for lists with > 2 elements, but uses more // faster for lists with > 2 elements, but uses more
// stack space // stack space