]> git.sur5r.net Git - cc65/blobdiff - libsrc/apple2/cvline.s
New code from Oliver Schmidt
[cc65] / libsrc / apple2 / cvline.s
index eeca3807a0b0edd6e45ddb783f4e40275885b0ba..044e73d58f5ca47ebc2a91176680f9d72ff99685 100644 (file)
@@ -20,11 +20,11 @@ _cvline:
 
 cvlinedirect:
        cmp     #$00            ; Is the length zero?
-       beq     L9              ; Jump if done
+       beq     done            ; Jump if done
        sta     tmp1
-L1:    txa                     ; Screen code
+:      txa                     ; Screen code
        jsr     putchar         ; Write, no cursor advance
        jsr     newline         ; Advance cursor to next line
        dec     tmp1
-       bne     L1
-L9:    rts
+       bne     :-
+done:  rts