diff options
| author | Xavier ASUS <xavi92psx@gmail.com> | 2019-10-18 00:31:54 +0200 |
|---|---|---|
| committer | Xavier ASUS <xavi92psx@gmail.com> | 2019-10-18 00:31:54 +0200 |
| commit | 268a53de823a6750d6256ee1fb1e7707b4b45740 (patch) | |
| tree | 42c1799a9a82b2f7d9790ee9fe181d72a7274751 /device/lib/stm8/_strncat.asm | |
| download | sdcc-gas-268a53de823a6750d6256ee1fb1e7707b4b45740.tar.gz | |
sdcc-3.9.0 fork implementing GNU assembler syntax
This fork aims to provide better support for stm8-binutils
Diffstat (limited to 'device/lib/stm8/_strncat.asm')
| -rw-r--r-- | device/lib/stm8/_strncat.asm | 115 |
1 files changed, 115 insertions, 0 deletions
diff --git a/device/lib/stm8/_strncat.asm b/device/lib/stm8/_strncat.asm new file mode 100644 index 0000000..c539a75 --- /dev/null +++ b/device/lib/stm8/_strncat.asm @@ -0,0 +1,115 @@ +;-------------------------------------------------------- +; File Created by SDCC : free open source ANSI-C Compiler +; Version 3.9.3 #11345 (Linux) +;-------------------------------------------------------- + .module _strncat + .optsdcc -mstm8 + +;-------------------------------------------------------- +; Public variables in this module +;-------------------------------------------------------- + .globl _strncat +;-------------------------------------------------------- +; ram data +;-------------------------------------------------------- + .area DATA +;-------------------------------------------------------- +; ram data +;-------------------------------------------------------- + .area INITIALIZED +;-------------------------------------------------------- +; absolute external ram data +;-------------------------------------------------------- + .area DABS (ABS) + +; default segment ordering for linker + .area HOME + .area GSINIT + .area GSFINAL + .area CONST + .area INITIALIZER + .area CODE + +;-------------------------------------------------------- +; global & static initialisations +;-------------------------------------------------------- + .area HOME + .area GSINIT + .area GSFINAL + .area GSINIT +;-------------------------------------------------------- +; Home +;-------------------------------------------------------- + .area HOME + .area HOME +;-------------------------------------------------------- +; code +;-------------------------------------------------------- + .area CODE +; ../_strncat.c: 31: char * strncat ( char * front, const char * back, size_t count ) +; ----------------------------------------- +; function strncat +; ----------------------------------------- +_strncat: + sub sp, #10 +; ../_strncat.c: 33: char *start = front; + ldw y, (0x0d, sp) +; ../_strncat.c: 35: while (*front++); + ldw (0x01, sp), y + ldw x, y +00101$: + ld a, (x) + incw x + tnz a + jrne 00101$ +; ../_strncat.c: 37: front--; + decw x + ldw (0x0d, sp), x +; ../_strncat.c: 39: while (count--) + ldw y, (0x0f, sp) + ldw (0x05, sp), y + ldw y, (0x0d, sp) + ldw (0x07, sp), y + ldw y, (0x11, sp) + ldw (0x09, sp), y +00106$: + ldw y, (0x09, sp) + ldw (0x03, sp), y + ldw x, (0x09, sp) + decw x + ldw (0x09, sp), x + ldw x, (0x03, sp) + jreq 00108$ +; ../_strncat.c: 40: if (!(*front++ = *back++)) + ldw x, (0x05, sp) + ld a, (x) + ldw x, (0x05, sp) + incw x + ldw (0x05, sp), x + ldw x, (0x07, sp) + ld (x), a + ldw x, (0x07, sp) + incw x + ldw (0x07, sp), x + ldw (0x0d, sp), x + tnz a + jrne 00106$ +; ../_strncat.c: 41: return(start); + ldw x, (0x01, sp) + jra 00109$ +00108$: +; ../_strncat.c: 43: *front = '\0'; + ldw y, (0x0d, sp) + ldw (0x09, sp), y + ldw x, y + clr (x) +; ../_strncat.c: 44: return(start); + ldw x, (0x01, sp) +00109$: +; ../_strncat.c: 45: } + addw sp, #10 + ret + .area CODE + .area CONST + .area INITIALIZER + .area CABS (ABS) |