|
|
@@ -65,8 +65,8 @@ namespace Slime { |
|
|
sym,
|
|
|
sym,
|
|
|
Memory::copy_lisp_object_except_pairs(next_arg));
|
|
|
Memory::copy_lisp_object_except_pairs(next_arg));
|
|
|
}
|
|
|
}
|
|
|
assert("cs access index out of range",
|
|
|
|
|
|
arg_pos+1 < cs->next_index);
|
|
|
|
|
|
|
|
|
//assert("cs access index out of range",
|
|
|
|
|
|
// arg_pos+1 < cs->next_index);
|
|
|
next_arg = cs->data[++arg_pos];
|
|
|
next_arg = cs->data[++arg_pos];
|
|
|
}
|
|
|
}
|
|
|
};
|
|
|
};
|
|
|
|