Changed naming absvaludiv -> absvaludiv16.

diff --git a/libsrc/runtime/absvaludiv.s b/libsrc/runtime/absvaludiv.s
index d23b8c00e3a15bbd7255516e57044b438168844f..59c2914b10791b9cd4364dbeae1b691832f99219 100644 (file)
--- a/libsrc/runtime/absvaludiv.s
+++ b/libsrc/runtime/absvaludiv.s
@@ -6,12 +6,12 @@
 ; When negating values, we will ignore the possibility here, that one of the
 ; values is $8000, in which case the negate will fail.
 
-        .export         absvaludiv
+        .export         absvaludiv16
         .import         _abs, popax, udiv16
         .importzp       ptr1, ptr4
 
 
-absvaludiv:
+absvaludiv16:
         jsr     _abs
         sta     ptr4
         stx     ptr4+1          ; Save right absolute operand      

diff --git a/libsrc/runtime/div.s b/libsrc/runtime/div.s
index 54da0c7e45d7ab29477fb9ba72be54cdd7d7b047..b33d852db8254d945a5adcdb57522e13372f4a7c 100644 (file)
--- a/libsrc/runtime/div.s
+++ b/libsrc/runtime/div.s
@@ -8,7 +8,7 @@
 ; values is $8000, in which case the negate will fail.
 
         .export         tosdiva0, tosdivax
-        .import         absvaludiv, negax
+        .import         absvaludiv16, negax
         .importzp       sp, ptr1, tmp1
 
 tosdiva0:
@@ -20,10 +20,10 @@ tosdivax:
         eor     (sp),y              ; eor with lhs high byte
         sta     tmp1                ; save post negation indicator to tmp1
         pla                         ; back to entry accu
-        jsr     absvaludiv
+        jsr     absvaludiv16
         ldx     ptr1+1
         lda     ptr1
-        ldy     tmp1                ; fetch idicator
+        ldy     tmp1                ; fetch indicator
         bmi     negate
         rts
 negate: jmp     negax

diff --git a/libsrc/runtime/mod.s b/libsrc/runtime/mod.s
index b3a818fda4d6c324b63f44d4c5c74dad2947b996..eb120377be84e6560894b9f5ef62bc46ce8cc9a1 100644 (file)
--- a/libsrc/runtime/mod.s
+++ b/libsrc/runtime/mod.s
@@ -8,7 +8,7 @@
 ; values is $8000, in which case the negate will fail.
 
         .export         tosmoda0, tosmodax
-        .import         absvaludiv, negax
+        .import         absvaludiv16, negax
         .importzp       sp, sreg, tmp1
 
 tosmoda0:
@@ -23,10 +23,10 @@ tosmodax:
         lda     (sp),y             
         sta     tmp1                ; save post negation indicator to tmp1
         pla                         ; back to entry accu
-        jsr     absvaludiv
+        jsr     absvaludiv16
         ldx     sreg+1              ; remainder to return registers
         lda     sreg
-        ldy     tmp1                ; fetch idicator
+        ldy     tmp1                ; fetch indicator
         bmi     negate
         rts
 negate: jmp     negax