summaryrefslogtreecommitdiff
path: root/newlib/libc/machine/w65/sdivhi3.s
diff options
context:
space:
mode:
authorPikalaxALT <pikalaxalt@gmail.com>2017-12-15 09:38:53 -0500
committerPikalaxALT <pikalaxalt@gmail.com>2017-12-15 09:39:34 -0500
commitf95a4a932476be2ba99e2fd081e8d2bc6ea12813 (patch)
tree75f67192cb2d7b7b575c94edda318e475239b63c /newlib/libc/machine/w65/sdivhi3.s
parentf60aca96985e68c7d8a52eb7bc955fb80e132f73 (diff)
Import newlib and create makefile
Diffstat (limited to 'newlib/libc/machine/w65/sdivhi3.s')
-rw-r--r--newlib/libc/machine/w65/sdivhi3.s35
1 files changed, 35 insertions, 0 deletions
diff --git a/newlib/libc/machine/w65/sdivhi3.s b/newlib/libc/machine/w65/sdivhi3.s
new file mode 100644
index 0000000..7958f11
--- /dev/null
+++ b/newlib/libc/machine/w65/sdivhi3.s
@@ -0,0 +1,35 @@
+ .global ___sdivhi3
+
+___sdivhi3:
+ lda <r4
+ ldx <r5
+
+ ldy #0 !flag positive result
+ rol a
+ ror a
+ bpl L10
+
+ iny !flag negative result
+ eor #0xFFFF
+ inc a
+
+L10: pha
+ txa
+ bpl L20
+
+ dey !flag negative/positive result
+ eor #0xFFFF
+ inc a
+ tax
+
+L20: pla
+ phy
+ jsr >udv
+ ply
+ beq Lend !if positive result
+
+ eor #0xFFFF !negate result
+ inc a
+
+Lend: sta <r0
+ rtl