aboutsummaryrefslogtreecommitdiff
path: root/amforth-6.5/avr8/words/dp.asm
blob: c9507f7de84b5efecf29c5fd6fcbf2c55a986c9a (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
; ( -- f-addr ) 
; System Value
; address of the next free dictionary cell
VE_DP:
    .dw $ff02
    .db "dp"
    .dw VE_HEAD
    .set VE_HEAD = VE_DP
XT_DP:
    .dw PFA_DOVALUE1
PFA_DP:
    .dw CFG_DP
    .dw XT_EDEFERFETCH
    .dw XT_EDEFERSTORE