aboutsummaryrefslogtreecommitdiff
path: root/amforth-6.5/msp430/words/usart-tx.asm
blob: 07b0f5aa0b334b8cdd910e6c272a5f9e146f65c1 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
; ----------------------------------------------------------------------
; TERMINAL I/O (TARGET-SPECIFIC)

;C EMIT     c --    output character to console
        HEADER(XT_USART_TX_POLL,2,"tx",DOCOLON)

EMITLOOP:
	.dw XT_EMITQ
	.dw XT_DOCONDBRANCH
	DEST(EMITLOOP)
	.dw XT_DOLITERAL
	.dw USART_TX_DATA
	.dw XT_CSTORE
	.dw XT_EXIT