X-Git-Url: https://git.sur5r.net/?a=blobdiff_plain;f=libsrc%2Fcommon%2Fisspace.s;h=64849f7f76b117c62befdaa9150c8d3d6db10d32;hb=f16516047a551319c82debd339ded8bc2b587212;hp=1c6cc2e8a6aa763217177d71b8591c8c743c1b75;hpb=53dd513176425872128ef26031d00952ef7a0628;p=cc65 diff --git a/libsrc/common/isspace.s b/libsrc/common/isspace.s index 1c6cc2e8a..64849f7f7 100644 --- a/libsrc/common/isspace.s +++ b/libsrc/common/isspace.s @@ -4,12 +4,18 @@ ; int isspace (int c); ; - .export _isspace - .import __ctype + .export _isspace + .include "ctype.inc" _isspace: - tay - lda __ctype,y ; Get character classification - and #$60 ; Mask space bits - rts + cpx #$00 ; Char range ok? + bne @L1 ; Jump if no + tay + lda __ctype,y ; Get character classification + and #(CT_SPACE | CT_OTHER_WS) ; Mask space bits + rts + +@L1: lda #$00 ; Return false + tax + rts