1
0
mirror of https://github.com/cc65/cc65.git synced 2024-12-25 17:29:50 +00:00
cc65/libsrc/common/isdigit.s

22 lines
518 B
ArmAsm
Raw Normal View History

2020-01-02 17:57:03 +00:00
; isdigit.s
;
2020-01-02 17:57:03 +00:00
; This file is part of
; cc65 - a freeware C compiler for 6502 based systems
;
2020-02-02 17:21:25 +00:00
; https://cc65.github.io
2020-01-02 17:57:03 +00:00
;
; See "LICENSE" file for legal information.
;
; int isdigit (int c);
;
.export _isdigit
.include "ctype.inc"
2020-04-02 20:58:16 +00:00
.import ctypemask
_isdigit:
2020-04-02 20:58:16 +00:00
jsr ctypemask ; (always clears X)
2020-01-02 17:57:03 +00:00
bcs @L1 ; out of range? (everything already clear -> false)
and #CT_DIGIT ; mask digit bit
2020-04-02 08:03:01 +00:00
@L1: rts