Use common naming scheme for tolowerdirect

This commit is contained in:
Colin Leroy-Mira
2024-03-22 17:19:26 +01:00
parent 0c681b42ef
commit 71d82ab5d9
2 changed files with 4 additions and 4 deletions

View File

@@ -10,14 +10,14 @@
; int tolower (int c);
;
.export _tolower, tolower_a
.export _tolower, tolowerdirect
.include "ctype.inc"
.import ctypemaskdirect
_tolower:
cpx #$00 ; out of range?
bne out ; if so, return the argument unchanged
tolower_a:
tolowerdirect:
pha ; save char
jsr ctypemaskdirect ; get character classification
and #CT_UPPER ; upper case char?