# HG changeset patch
# User William Astle <lost@l-w.ca>
# Date 1703652250 25200
# Node ID b10f6c8979a597907ad3547a85582c56adc1783d
# Parent  00c8df0b61f54b23209d62570a59221081ca524f
Remove unneeded integer divide by 10 routine

diff -r 00c8df0b61f5 -r b10f6c8979a5 src/int.s
--- a/src/int.s	Mon Dec 25 22:37:55 2023 -0700
+++ b/src/int.s	Tue Dec 26 21:44:10 2023 -0700
@@ -328,12 +328,6 @@
                 stb fpaextra
                 rts
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
-; Integer divide (X) by 10 *in place*
-int32_const10   fqb 10                          ; integer constant 10
-int32_div10     ldu #int32_const10              ; point to integer constant 10
-                leay ,x                         ; point to output location
-                ; fall through to integer division
-;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 ; 32 bit division, integer only, truncate fraction without rounding. Note that there is exactly one case where integer
 ; division can overflow: dividing -0x80000000 by -1 which yields 0x80000000. All other cases reduce the magnitude.
 int32_div       ldd val.int+2,x                 ; copy left operand to temporary