summaryrefslogtreecommitdiff
path: root/device/lib/stm8/_divschar.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/_divschar.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/_divschar.asm')
-rw-r--r--device/lib/stm8/_divschar.asm122
1 files changed, 122 insertions, 0 deletions
diff --git a/device/lib/stm8/_divschar.asm b/device/lib/stm8/_divschar.asm
new file mode 100644
index 0000000..17e7b10
--- /dev/null
+++ b/device/lib/stm8/_divschar.asm
@@ -0,0 +1,122 @@
+;--------------------------------------------------------
+; File Created by SDCC : free open source ANSI-C Compiler
+; Version 3.9.3 #11345 (Linux)
+;--------------------------------------------------------
+ .module _divschar
+ .optsdcc -mstm8
+
+;--------------------------------------------------------
+; Public variables in this module
+;--------------------------------------------------------
+ .globl __divschar
+ .globl __divuschar
+ .globl __divsuchar
+;--------------------------------------------------------
+; 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
+; ../_divschar.c: 31: _divschar (signed char x, signed char y)
+; -----------------------------------------
+; function _divschar
+; -----------------------------------------
+__divschar:
+; ../_divschar.c: 33: return ((int)x / (int)y);
+ ld a, (0x03, sp)
+ ld xl, a
+ rlc a
+ clr a
+ sbc a, #0x00
+ ld xh, a
+ ld a, (0x04, sp)
+ ld yl, a
+ rlc a
+ clr a
+ sbc a, #0x00
+ ld yh, a
+ pushw y
+ pushw x
+ call __divsint
+ addw sp, #4
+; ../_divschar.c: 34: }
+ ret
+; ../_divschar.c: 37: _divuschar (unsigned char x, unsigned char y)
+; -----------------------------------------
+; function _divuschar
+; -----------------------------------------
+__divuschar:
+ sub sp, #2
+; ../_divschar.c: 39: return ((int)((signed char)x) / (int)y);
+ ld a, (0x05, sp)
+ ld xl, a
+ rlc a
+ clr a
+ sbc a, #0x00
+ ld xh, a
+ ld a, (0x06, sp)
+ ld (0x02, sp), a
+ clr (0x01, sp)
+ ldw y, (0x01, sp)
+ pushw y
+ pushw x
+ call __divsint
+; ../_divschar.c: 40: }
+ addw sp, #6
+ ret
+; ../_divschar.c: 43: _divsuchar (signed char x, signed char y)
+; -----------------------------------------
+; function _divsuchar
+; -----------------------------------------
+__divsuchar:
+; ../_divschar.c: 45: return ((int)((unsigned char)x) / (int)y);
+ ld a, (0x03, sp)
+ clrw y
+ ld yl, a
+ ld a, (0x04, sp)
+ ld xl, a
+ rlc a
+ clr a
+ sbc a, #0x00
+ ld xh, a
+ pushw x
+ pushw y
+ call __divsint
+ addw sp, #4
+; ../_divschar.c: 46: }
+ ret
+ .area CODE
+ .area CONST
+ .area INITIALIZER
+ .area CABS (ABS)