Use constants for the bits in the _ctype array.
git-svn-id: svn://svn.cc65.org/cc65/trunk@865 b7a2c559-68d2-44c3-8de9-860c34a00d81
This commit is contained in:
@@ -5,14 +5,14 @@
|
||||
;
|
||||
|
||||
.export _iscntrl
|
||||
.import __ctype
|
||||
.include "ctype.inc"
|
||||
|
||||
_iscntrl:
|
||||
cpx #$00 ; Char range ok?
|
||||
bne @L1 ; Jump if no
|
||||
tay
|
||||
lda __ctype,y ; Get character classification
|
||||
and #$10 ; Mask control character bit
|
||||
and #CT_CTRL ; Mask control character bit
|
||||
rts
|
||||
|
||||
@L1: lda #$00 ; Return false
|
||||
|
||||
Reference in New Issue
Block a user