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

;C EMIT?     c --    output character to console
HEADER(XT_USART_TXQ_POLL,3,"tx?",DOCOLON)
  .dw XT_PAUSE
  .dw XT_DOLITERAL
  .dw bm_USART_TXRD
  .dw XT_DUP
  .dw XT_DOLITERAL
  .dw USART_TX_CFG
  .dw XT_CFETCH
  .dw XT_AND
  .dw XT_EQUAL
  .dw XT_EXIT