Shortened names and adjusted style.
This commit is contained in:
@@ -12,12 +12,12 @@
|
||||
|
||||
.export _islower
|
||||
.include "ctype.inc"
|
||||
.import ctype_preprocessor
|
||||
.import ctypemask
|
||||
|
||||
_islower:
|
||||
jsr ctype_preprocessor ; (always clears X)
|
||||
bcs @L1 ; out of range? (everything already clear -> false)
|
||||
and #CT_LOWER ; mask lower char bit
|
||||
jsr ctypemask ; (always clears X)
|
||||
bcs @L1 ; out of range? (everything already clear -> false)
|
||||
and #CT_LOWER ; mask lower char bit
|
||||
@L1: rts
|
||||
|
||||
|
||||
|
||||
Reference in New Issue
Block a user