aboutsummaryrefslogtreecommitdiff
path: root/amforth-6.5/avr8/words/env-slashpad.asm
blob: 1cb7dbbefa1d510599db8b6045d640c1fb41b016 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
; ( -- padsize ) 
; Environment
; Size of the PAD buffer in bytes
VE_ENVSLASHPAD:
    .dw $ff04
    .db "/pad"
    .dw VE_ENVHEAD
    .set VE_ENVHEAD = VE_ENVSLASHPAD
XT_ENVSLASHPAD:
    .dw DO_COLON
PFA_ENVSLASHPAD:
    .dw XT_SP_FETCH
    .dw XT_PAD
    .dw XT_MINUS
    .dw XT_EXIT