uxn

Varvara Ordinator, written in ANSI C(SDL2)
git clone https://git.eamoncaddigan.net/uxn.git
Log | Files | Refs | README | LICENSE

commit 52fac7c52b34148e1455a1ade97d576f0ba7cb26
parent 901f76ed52772f3b234adaea9102e698ffaf8a76
Author: neauoire <aliceffekt@gmail.com>
Date:   Tue,  8 Aug 2023 17:23:18 -0700

Faster Pushxx

Diffstat:
Msrc/uxn.c | 2+-
1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/uxn.c b/src/uxn.c @@ -19,7 +19,7 @@ WITH REGARD TO THIS SOFTWARE. #define PUSH1(y) { if(s->ptr == 0xff) HALT(2) s->dat[s->ptr++] = (y); } #define PUSH2(y) { if((tsp = s->ptr) >= 0xfe) HALT(2) t = (y); POKE2(&s->dat[tsp], t); s->ptr = tsp + 2; } #define PUSHx(y) { if(m2) { PUSH2(y) } else { PUSH1(y) } } -#define PUSHxx(y, z) { if(m2) { PUSH2(y) PUSH2(z) } else { PUSH1(y) PUSH1(z) } } +#define PUSHxx(y, z) { if(m2) { PUSH2(y) PUSH2(z) } else { PUSH2(y << 8 | z) } } #define POP1(o) { if(*sp == 0x00) HALT(1) o = s->dat[--*sp]; } #define POP2(o) { if((tsp = *sp) <= 0x01) HALT(1) o = PEEK2(&s->dat[tsp - 2]); *sp = tsp - 2; } #define POPx(o) { if(m2) { POP2(o) } else { POP1(o) } }