Changed the name of the file too.

2018-05-24 11:37:17 +02:00
parent 9c1cb0801c
commit 71420223bc
1 changed files with 0 additions and 0 deletions
--- a/libsrc/runtime/absvaludiv16.s
+++ b/libsrc/runtime/absvaludiv16.s
@@ -0,0 +1,22 @@
+;
+; Christian Krueger, 23-May-2018
+;
+; CC65 runtime: helper call for mod/div with signed ints
+;
+; When negating values, we will ignore the possibility here, that one of the
+; values is $8000, in which case the negate will fail.
+
+        .export         absvaludiv16
+        .import         _abs, popax, udiv16
+        .importzp       ptr1, ptr4
+
+
+absvaludiv16:
+        jsr     _abs
+        sta     ptr4
+        stx     ptr4+1          ; Save right absolute operand      
+        jsr     popax
+        jsr     _abs
+        sta     ptr1
+        stx     ptr1+1          ; Save left absolute operand  
+        jmp     udiv16