FreeCalypso > hg > freecalypso-tools
view target-utils/libbase/serio.S @ 561:392525355ee7
loadtools/scripts: gtm900.config renamed to gen4.config
It turns out that a GTM900 variant exists with 8 MiB flash, thus -h gen8
needs to be used for GTM900 modules as the general case, and the old
-h gtm900 config is best renamed to -h gen4, although not currently official
for any actual target.
| author | Mychaela Falconia <falcon@freecalypso.org> |
|---|---|
| date | Thu, 30 Jan 2020 07:10:20 +0000 |
| parents | da6df2c626cf |
| children |
line wrap: on
line source
#include "ns16550.h" @ this module implements the elementary serial I/O operations .comm uart_base,4,4 .text .code 32 .global serial_out serial_out: ldr r1, =uart_base ldr r2, [r1] 1: ldrb r3, [r2, #0x11] @ Calypso UART non-std register SSR tst r3, #0x01 @ Tx FIFO full flag bne 1b strb r0, [r2, #NS16550_THR] bx lr .global serial_in_poll serial_in_poll: ldr r1, =uart_base ldr r2, [r1] ldrb r3, [r2, #NS16550_LSR] tst r3, #NS16550_LSR_DR ldrneb r0, [r2, #NS16550_RBR] mvneq r0, #0 bx lr .global serial_flush serial_flush: ldr r1, =uart_base ldr r2, [r1] 1: ldrb r3, [r2, #NS16550_LSR] tst r3, #NS16550_LSR_TEMP beq 1b bx lr