aboutsummaryrefslogtreecommitdiff
path: root/amforth-6.5/avr8/words/store-i.asm
blob: a56fce2c96ee483aeea19edb6dcfa0a7e5db14c8 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
; ( n addr -- ) 
; System Value
; Deferred action to write a single 16bit cell to flash
VE_STOREI:
    .dw $ff02
    .db "!i"
    .dw VE_HEAD
    .set VE_HEAD = VE_STOREI
XT_STOREI:
    .dw PFA_DODEFER1
PFA_STOREI:
    .dw EE_STOREI
    .dw XT_EDEFERFETCH
    .dw XT_EDEFERSTORE