no TGI_ERR_NO_MEM or TGI_ERR_NO_IOCB anymore: replaced by TGI_ERR_NO_RES

[cc65] / libsrc / runtime / ldiv.s

diff --git a/libsrc/runtime/ldiv.s b/libsrc/runtime/ldiv.s
index cbbf78aa7a1714c243ecd125ec6b960c17f5c711..3d8dda0d5bd4a0ee60cc869f702d35006b290e42 100644 (file)
--- a/libsrc/runtime/ldiv.s
+++ b/libsrc/runtime/ldiv.s
@@ -7,9 +7,14 @@
 ; When negating values, we will ignore the possibility here, that one of the
 ; values if $80000000, in which case the negate will fail.
 
-               .export         tosdiveax
-       .import         poplsargs, udiv32, negeax
-       .importzp       ptr1, tmp1, tmp2
+               .export         tosdiv0ax, tosdiveax
+       .import         poplsargs, udiv32, negeax
+       .importzp       sreg, ptr1, tmp1, tmp2
+
+tosdiv0ax:
+        ldy     #$00
+        sty     sreg
+        sty     sreg+1
 
 tosdiveax:
                jsr     poplsargs       ; Get arguments from stack, adjust sign