The spans do now contain the size of a span, no longer the end offset.

[cc65] / libsrc / common / tolower.s

diff --git a/libsrc/common/tolower.s b/libsrc/common/tolower.s
index fa03146b0b8816be4c68427828aedfa28d3672f4..f44aa9cad2778be6f40788339dbc5ef9e9e4cff5 100644 (file)
--- a/libsrc/common/tolower.s
+++ b/libsrc/common/tolower.s
@@ -5,15 +5,17 @@
 ;
 
        .export         _tolower
-       .import         __ctype, __cdiff
+       .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                     ; CC are set
+               sbc     #<('A'-'a')     ; Make lower case char (carry already set)
+L9:            rts