From ccc04526f14764d856ad37b1f517308fccf886a6 Mon Sep 17 00:00:00 2001 From: Jacques Comeaux Date: Wed, 21 Aug 2024 03:18:35 -0500 Subject: Add label and opcode parsers --- newasm/symbol.s | 48 ++++++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 48 insertions(+) create mode 100644 newasm/symbol.s (limited to 'newasm/symbol.s') diff --git a/newasm/symbol.s b/newasm/symbol.s new file mode 100644 index 0000000..0677f6a --- /dev/null +++ b/newasm/symbol.s @@ -0,0 +1,48 @@ +.syntax unified +.cpu cortex-m0plus +.thumb + +.type symbol, %function +.global symbol + +// 1 unexpected begin char + +// R1 input buffer +// R2 output buffer + +symbol: PUSH {LR} + LDRB R0, [R1] // get a char + BL goodchar // check if valid symbol char + BEQ loop + MOVS R0, #1 // unexpected begin char + POP {PC} +loop: ADDS R1, 1 // consume the character + STRB R0, [R2] // store in temp buffer + ADDS R2, 1 // advance temp buffer pointer + LDRB R0, [R1] // get another character + BL goodchar // check if valid symbol char + BEQ loop // if so keep getting chars + MOVS R0, #0 // return code success + STRB R0, [R2] // write null byte + POP {PC} + +goodchar: CMP R0, '$ + BEQ good + CMP R0, '. + BEQ good + CMP R0, '0 + BLO bad + CMP R0, '9 + BLS good + CMP R0, 'A + BLO bad + CMP R0, 'Z + BLS good + CMP R0, '_ + BEQ good + CMP R0, 'a + BLO bad + CMP R0, 'z + BHI bad +good: CMP R0, R0 +bad: BX LR -- cgit v1.2.3