Cleanups for Creativision.

[cc65] / libsrc / creativision / cclear.s

diff --git a/libsrc/creativision/cclear.s b/libsrc/creativision/cclear.s
index 507c072bd41b66c5826042670475132bd25409b5..953ec8ce8d4ce253dbd250252f38629bb5485b96 100644 (file)
--- a/libsrc/creativision/cclear.s
+++ b/libsrc/creativision/cclear.s
@@ -3,27 +3,24 @@
 ;* void cclear (unsigned char length);
 ;*
 
-    .export     _cclearxy, _cclear
-    .import     popa, _gotoxy, cputdirect
-    .importzp   tmp1
-    
+        .export     _cclearxy, _cclear
+        .import     popa, _gotoxy, cputdirect
+        .importzp   tmp1
+
 _cclearxy:
-    pha        ; Save length
-    jsr         popa    ; get Y
-    jsr         _gotoxy
-    pla
-    
+        pha             ; Save length
+        jsr     popa    ; get Y
+        jsr     _gotoxy
+        pla
+
 _cclear:
-    cmp         #0      ; Zero length?
-    beq         L2
-    sta         tmp1
-    
-L1:     
-    lda         #$20    ; Space
-    jsr         cputdirect
-    dec         tmp1
-    bne         L1
-    
-L2:     rts
+        cmp     #0      ; Zero length?
+        beq     L2
+        sta     tmp1
 
-    
+L1:     lda     #$20    ; Space
+        jsr     cputdirect
+        dec     tmp1
+        bne     L1
+
+L2:     rts