X-Git-Url: https://git.sur5r.net/?a=blobdiff_plain;f=libsrc%2Fcommon%2Fisxdigit.s;h=50146e82e366caf56982c9e231d3c3e5e24cd42b;hb=ea75fef1bf99fabff9c9eaa804468ee40339f87f;hp=a3184d17beb3731426389b8f90942efdbfb3a373;hpb=53dd513176425872128ef26031d00952ef7a0628;p=cc65 diff --git a/libsrc/common/isxdigit.s b/libsrc/common/isxdigit.s index a3184d17b..50146e82e 100644 --- a/libsrc/common/isxdigit.s +++ b/libsrc/common/isxdigit.s @@ -5,11 +5,17 @@ ; .export _isxdigit - .import __ctype + .include "ctype.inc" _isxdigit: + cpx #$00 ; Char range ok? + bne @L1 ; Jump if no tay lda __ctype,y ; Get character classification - and #$08 ; Mask xdigit bit + and #CT_XDIGIT ; Mask xdigit bit + rts + +@L1: lda #$00 ; Return false + tax rts