summaryrefslogtreecommitdiff
path: root/device/lib/stm8/_strpbrk.asm
diff options
context:
space:
mode:
authorXavier ASUS <xavi92psx@gmail.com>2019-10-18 00:31:54 +0200
committerXavier ASUS <xavi92psx@gmail.com>2019-10-18 00:31:54 +0200
commit268a53de823a6750d6256ee1fb1e7707b4b45740 (patch)
tree42c1799a9a82b2f7d9790ee9fe181d72a7274751 /device/lib/stm8/_strpbrk.asm
downloadsdcc-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/_strpbrk.asm')
-rw-r--r--device/lib/stm8/_strpbrk.asm101
1 files changed, 101 insertions, 0 deletions
diff --git a/device/lib/stm8/_strpbrk.asm b/device/lib/stm8/_strpbrk.asm
new file mode 100644
index 0000000..45d4ff4
--- /dev/null
+++ b/device/lib/stm8/_strpbrk.asm
@@ -0,0 +1,101 @@
+;--------------------------------------------------------
+; File Created by SDCC : free open source ANSI-C Compiler
+; Version 3.9.3 #11345 (Linux)
+;--------------------------------------------------------
+ .module _strpbrk
+ .optsdcc -mstm8
+
+;--------------------------------------------------------
+; Public variables in this module
+;--------------------------------------------------------
+ .globl _strchr
+ .globl _strpbrk
+;--------------------------------------------------------
+; 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
+; ../_strpbrk.c: 31: char * strpbrk ( const char * string, const char * control )
+; -----------------------------------------
+; function strpbrk
+; -----------------------------------------
+_strpbrk:
+ sub sp, #4
+; ../_strpbrk.c: 33: char *ret = NULL;
+ clrw x
+ ldw (0x01, sp), x
+; ../_strpbrk.c: 36: while (ch = *control) {
+ ldw y, (0x09, sp)
+ ldw (0x03, sp), y
+00105$:
+ ldw x, (0x03, sp)
+ ld a, (x)
+ ld xl, a
+ tnz a
+ jreq 00107$
+; ../_strpbrk.c: 37: char * p = strchr(string, ch);
+ clr a
+ ld xh, a
+ pushw x
+ ldw x, (0x09, sp)
+ pushw x
+ call _strchr
+ addw sp, #4
+; ../_strpbrk.c: 38: if (p != NULL && (ret == NULL || p < ret)) {
+ tnzw x
+ jreq 00102$
+ ldw y, (0x01, sp)
+ jreq 00101$
+ cpw x, (0x01, sp)
+ jrnc 00102$
+00101$:
+; ../_strpbrk.c: 39: ret = p;
+ ldw (0x01, sp), x
+00102$:
+; ../_strpbrk.c: 41: control++;
+ ldw x, (0x03, sp)
+ incw x
+ ldw (0x03, sp), x
+ jra 00105$
+00107$:
+; ../_strpbrk.c: 44: return (ret);
+ ldw x, (0x01, sp)
+; ../_strpbrk.c: 45: }
+ addw sp, #4
+ ret
+ .area CODE
+ .area CONST
+ .area INITIALIZER
+ .area CABS (ABS)