POPN macro was not used
This commit is contained in:
parent
bc602aa767
commit
5776940420
3
src/vm.c
3
src/vm.c
|
@ -464,7 +464,6 @@ pic_apply_argv(pic_state *pic, struct pic_proc *proc, size_t argc, ...)
|
||||||
|
|
||||||
#define PUSH(v) ((pic->sp >= pic->stend) ? abort() : (*pic->sp++ = (v)))
|
#define PUSH(v) ((pic->sp >= pic->stend) ? abort() : (*pic->sp++ = (v)))
|
||||||
#define POP() (*--pic->sp)
|
#define POP() (*--pic->sp)
|
||||||
#define POPN(i) (pic->sp -= (i))
|
|
||||||
|
|
||||||
#define PUSHCI() (++pic->ci)
|
#define PUSHCI() (++pic->ci)
|
||||||
#define POPCI() (pic->ci--)
|
#define POPCI() (pic->ci--)
|
||||||
|
@ -526,7 +525,7 @@ pic_apply(pic_state *pic, struct pic_proc *proc, pic_value argv)
|
||||||
NEXT;
|
NEXT;
|
||||||
}
|
}
|
||||||
CASE(OP_POP) {
|
CASE(OP_POP) {
|
||||||
POPN(1);
|
POP();
|
||||||
NEXT;
|
NEXT;
|
||||||
}
|
}
|
||||||
CASE(OP_PUSHNIL) {
|
CASE(OP_PUSHNIL) {
|
||||||
|
|
Loading…
Reference in New Issue