aboutsummaryrefslogtreecommitdiff
path: root/amforth-6.5/common/words/env-slashhold.asm
blob: 9fa9468bcb7e6d165190933b9962c4579ad6f41b (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
; ( -- hldsize ) 
; Environment
; size of the pictured numeric output buffer in bytes

.if cpu_msp430==1
    ENVIRONMENT(XT_ENVSLASHHOLD,5,"/hold",DOCOLON)
.endif

.if cpu_avr8==1
VE_ENVSLASHHOLD:
    .dw $ff05
    .db "/hold",0
    .dw VE_ENVHEAD
    .set VE_ENVHEAD = VE_ENVSLASHHOLD
XT_ENVSLASHHOLD:
    .dw DO_COLON
PFA_ENVSLASHHOLD:
.endif
    .dw XT_PAD
    .dw XT_HERE
    .dw XT_MINUS
    .dw XT_EXIT