Use more compact loops.

2020-11-01 22:59:07 +01:00
parent 99c0815cdb
commit f59cb9af06
13 changed files with 90 additions and 94 deletions
--- a/libsrc/conio/vcprintf.s
+++ b/libsrc/conio/vcprintf.s
@@ -47,12 +47,12 @@ outdesc:                        ; Static outdesc structure

 out:    jsr     popax           ; count
        sta     ptr2
-        eor     #$FF
-        sta     outdesc+6
-        txa
-        sta     ptr2+1
-        eor     #$FF
-        sta     outdesc+7
+        stx     ptr2+1
+        inx
+        stx     outdesc+7
+        tax
+        inx
+        stx     outdesc+6

        jsr     popptr1         ; buf

@@ -74,7 +74,7 @@ out:    jsr     popax           ; count

 ; Loop outputting characters

-@L1:    inc     outdesc+6
+@L1:    dec     outdesc+6
        beq     @L4
@L2:    ldy     tmp1
        lda     (ptr1),y
@@ -85,7 +85,7 @@ out:    jsr     popax           ; count
        jsr     _cputc
        jmp     @L1

-@L4:    inc     outdesc+7
+@L4:    dec     outdesc+7
        bne     @L2
        rts