no TGI_ERR_NO_MEM or TGI_ERR_NO_IOCB anymore: replaced by TGI_ERR_NO_RES

[cc65] / libsrc / runtime / mulax6.s

diff --git a/libsrc/runtime/mulax6.s b/libsrc/runtime/mulax6.s
index e5e350385b951b2041fd1c40bdbe05dfb42d130e..78aa85bda817f9f0ea15378a016d98426dd9d82c 100644 (file)
--- a/libsrc/runtime/mulax6.s
+++ b/libsrc/runtime/mulax6.s
@@ -1,28 +1,28 @@
 ;
-; Ullrich von Bassewitz, 16.03.2002
+; Piotr Fusik, 24.10.2003
+; originally by Ullrich von Bassewitz
 ;
-; CC65 runtime: Multiply the primary register
+; CC65 runtime: Multiply the primary register by 6
 ;
 
-       .export         mulax6
-       .importzp       ptr1
+       .export         mulax6
+       .importzp       ptr1
 
 .proc  mulax6
 
-       sta     ptr1
+       sta     ptr1
        stx     ptr1+1
        asl     a
        rol     ptr1+1
        clc
        adc     ptr1
-       pha
+       sta     ptr1
        txa
        adc     ptr1+1
-       sta     ptr1+1
-       pla
-       asl     a
-       rol     ptr1+1
-       ldx     ptr1+1
+       asl     ptr1
+       rol     a
+       tax
+       lda     ptr1
        rts
 
 .endproc