]> git.sur5r.net Git - cc65/blobdiff - libsrc/common/tolower.s
Removed (pretty inconsistently used) tab chars from source code base.
[cc65] / libsrc / common / tolower.s
index 0c67199a312da3ebbcb20eabaf93eaa621ed0c79..2c624cb745f4248ad3f746e3627f27da04f97edd 100644 (file)
@@ -4,18 +4,18 @@
 ; int tolower (int c);
 ;
 
-       .export         _tolower
-       .import         __ctype, __cdiff
+        .export         _tolower
+        .import         __ctype
 
 _tolower:
         cpx     #$00            ; Outside valid range?
         bne     L9              ; If so, return the argument unchanged
-               tay                     ; Get C into Y
-       lda     __ctype,y       ; Get character classification
-       lsr     a
-       lsr     a               ; Get bit 1 (upper case char) into carry
-       tya                     ; Get char back into A
-               bcc     L9              ; Jump if no upper case char
-       sbc     __cdiff         ; Make lower case char (carry already set)
-L9:            rts
+        tay                     ; Get C into Y
+        lda     __ctype,y       ; Get character classification
+        lsr     a
+        lsr     a               ; Get bit 1 (upper case char) into carry
+        tya                     ; Get char back into A
+        bcc     L9              ; Jump if no upper case char
+        sbc     #<('A'-'a')     ; Make lower case char (carry already set)
+L9:     rts