Merge pull request #150 from zeptometer/fix-append
append returns '() when given no args
This commit is contained in:
commit
346a687e25
|
@ -501,6 +501,10 @@ pic_pair_append(pic_state *pic)
|
|||
|
||||
pic_get_args(pic, "*", &argc, &args);
|
||||
|
||||
if (argc == 0) {
|
||||
return pic_nil_value();
|
||||
}
|
||||
|
||||
list = args[--argc];
|
||||
|
||||
while (argc-- > 0) {
|
||||
|
|
Loading…
Reference in New Issue