aboutsummaryrefslogtreecommitdiff
path: root/amforth-6.5/msp430/words/scomma.asm
blob: 92614e2844af50f0aee03dea473c60d2616e9ce7 (plain)
1
2
3
4
5
6
7
8
9
10
; compiles a string to the dictionary. Does not add a runtime action.
        DW      link
        DB      0FEh       ; immediate
.set link = $
        DB      2,"s",','
        .align 16
XT_SCOMMA: 
	DW      DOCOLON
        DW XT_DUP,XT_TO_R,XT_CCOMMA,XT_IHERE,XT_R_FETCH,XT_DTOI
        DW XT_R_FROM,XT_IALLOT,XT_ALIGN,XT_EXIT