diff options
author | PikalaxALT <pikalaxalt@gmail.com> | 2017-12-15 09:38:53 -0500 |
---|---|---|
committer | PikalaxALT <pikalaxalt@gmail.com> | 2017-12-15 09:39:34 -0500 |
commit | f95a4a932476be2ba99e2fd081e8d2bc6ea12813 (patch) | |
tree | 75f67192cb2d7b7b575c94edda318e475239b63c /newlib/libc/machine/w65/sdivhi3.s | |
parent | f60aca96985e68c7d8a52eb7bc955fb80e132f73 (diff) |
Import newlib and create makefile
Diffstat (limited to 'newlib/libc/machine/w65/sdivhi3.s')
-rw-r--r-- | 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 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 |