mirror of
https://github.com/cc65/cc65.git
synced 2024-07-03 22:29:31 +00:00
16 lines
214 B
ArmAsm
16 lines
214 B
ArmAsm
|
;
|
||
|
|
; Ullrich von Bassewitz, 02.06.1998
|
||
|
|
;
|
||
|
|
; int isalnum (int c);
|
||
|
|
;
|
||
|
|
|
||
|
|
.export _isalnum
|
||
|
|
.import __ctype
|
||
|
|
|
||
|
|
_isalnum:
|
||
|
|
tay
|
||
|
|
lda __ctype,y ; Get character classification
|
||
|
|
and #$07 ; Mask character/digit bits
|
||
|
|
rts
|
||
|
|
|