1
0
mirror of https://github.com/fachat/xa65.git synced 2024-07-07 06:28:57 +00:00
xa65/xa/tests/recmac/test.asm
2011-12-16 23:04:51 +01:00

32 lines
415 B
NASM

#define AA 1
#define POKE(a,b) lda #b: sta a
#define WW AA
start
; next line works
POKE(1, 2)
; next two lines work
lda #AA
sta 2
; next line fails
POKE(AA, 2)
POKE(WW, 2)
lda #WW
sta 2
#define WW 94
POKE(WW, 2)
#define WW 5
#define AA WW
#define POKE(a,b) lda #a: sta b
POKE(AA, 3)
bne start
rts
/* this should bug out */
/*
POKE(NOGOOD, 7)
*/