the10thwiz/cc65
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Shortened names and adjusted style.

Browse Source
This commit is contained in:
Oliver Schmidt
2020-04-02 22:58:16 +02:00
parent 411fe87f64
commit 0981c020b2
27 changed files with 92 additions and 99 deletions
Download Patch File Download Diff File Expand all files Collapse all files

12
libsrc/common/ispunct.s
View File

@@ -12,13 +12,13 @@
.export _ispunct
.include "ctype.inc"
.import ctype_preprocessor
.import ctypemask
_ispunct:
jsr ctype_preprocessor ; (always clears X)
bcs @L1 ; out of range? (everything already clear -> false)
and #CT_NOT_PUNCT ; mask relevant bits
cmp #1 ; if false, then set "borrow" flag
jsr ctypemask ; (always clears X)
bcs @L1 ; out of range? (everything already clear -> false)
and #CT_NOT_PUNCT ; mask relevant bits
cmp #1 ; if false, then set "borrow" flag
lda #0
sbc #0 ; invert logic (return NOT (space | control | digit | alpha))
sbc #0 ; invert logic (return NOT (space | control | digit | alpha))
@L1: rts