mirror of https://github.com/cc65/cc65.git
22 lines
547 B
ArmAsm
22 lines
547 B
ArmAsm
; isalpha.s
|
|
;
|
|
; This file is part of
|
|
; cc65 - a freeware C compiler for 6502 based systems
|
|
;
|
|
; https://github.com/cc65/cc65
|
|
;
|
|
; See "LICENSE" file for legal information.
|
|
;
|
|
; int isalpha (int c);
|
|
;
|
|
|
|
.export _isalpha
|
|
.include "ctype.inc"
|
|
.import ctype_preprocessor
|
|
|
|
_isalpha:
|
|
jsr ctype_preprocessor ; (clears always x)
|
|
bcs @L1 ; out of range? (everything already clear -> false)
|
|
and #CT_ALPHA ; mask character bits
|
|
@L1: rts
|