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

[cc65] / libsrc / common / strupper.s

diff --git a/libsrc/common/strupper.s b/libsrc/common/strupper.s
index b330ab8c1c7e0db94532faaf8a86ed0573cb7b31..70b593fab61201936c16f518aa9c004522e36b93 100644 (file)
--- a/libsrc/common/strupper.s
+++ b/libsrc/common/strupper.s
@@ -12,6 +12,8 @@
        .import         __ctype
        .importzp       ptr1, ptr2
 
+        .include        "ctype.inc"
+
 _strupper:
 _strupr:
        sta     ptr1            ; Save s (working copy)
@@ -24,7 +26,7 @@ loop: lda     (ptr1),y        ; get character
        beq     L9              ; jump if done
        tax
        lda     __ctype,x       ; get character classification
-       and     #$01            ; lower case char?
+               and     #CT_LOWER       ; lower case char?
        beq     L1              ; jump if no
        txa                     ; get character back into accu
        clc