cc65/libsrc/common/islower.s

24 lines
510 B
ArmAsm

; islower.s
;
; This file is part of
; cc65 - a freeware C compiler for 6502 based systems
;
; https://cc65.github.io
;
; See "LICENSE" file for legal information.
;
; int islower (int c);
;
.export _islower
.include "ctype.inc"
.import ctypemask
_islower:
jsr ctypemask ; (always clears X)
bcs @L1 ; out of range? (everything already clear -> false)
and #CT_LOWER ; mask lower char bit
@L1: rts