diff options
Diffstat (limited to 'newlib/libc/machine/w65/sdivhi3.S')
-rwxr-xr-x | newlib/libc/machine/w65/sdivhi3.S | 35 |
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 100755 index 000000000..7958f11e7 --- /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 |