; ( c a-addr -- ) ; Memory ; store a single byte to RAM address VE_CSTORE: .dw $ff02 .db "c!" .dw VE_HEAD .set VE_HEAD = VE_CSTORE XT_CSTORE: .dw PFA_CSTORE PFA_CSTORE: movw zl, tosl loadtos st Z, tosl loadtos jmp_ DO_NEXT