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

[cc65] / libsrc / common / ispunct.s

diff --git a/libsrc/common/ispunct.s b/libsrc/common/ispunct.s
index c2d6c2338c9fa0704fa5bbd3016160a0f78b8d36..380cf38ccc2dedbe3cdd84f454f9db91923283c8 100644 (file)
--- a/libsrc/common/ispunct.s
+++ b/libsrc/common/ispunct.s
@@ -5,15 +5,15 @@
 ;
 
        .export         _ispunct
-       .import         __ctype
+               .include        "ctype.inc"
 
 _ispunct:
        cpx     #$00            ; Char range ok?
        bne     @L1             ; Jump if no
        tay
        lda     __ctype,y       ; Get character classification
-               eor     #$37            ; NOT (space | control | digit | char)
-               and     #$37            ; Mask relevant bits
+               eor     #CT_NOT_PUNCT   ; NOT (space | control | digit | alpha)
+               and     #CT_NOT_PUNCT   ; Mask relevant bits
        rts
 
 @L1:   lda     #$00            ; Return false