Use named constants from ctype.inc instead of hard coded numeric values.

git-svn-id: svn://svn.cc65.org/cc65/trunk@3929 b7a2c559-68d2-44c3-8de9-860c34a00d81
This commit is contained in:
uz
2009-02-10 22:11:56 +00:00
parent b6d7dba170
commit feb31603da
5 changed files with 23 additions and 15 deletions

View File

@@ -12,6 +12,8 @@
.import __ctype
.importzp ptr1, ptr2
.include "ctype.inc"
_strlower:
_strlwr:
sta ptr1 ; Save s (working copy)
@@ -24,7 +26,7 @@ loop: lda (ptr1),y ; get character
beq L9 ; jump if done
tax
lda __ctype,x ; get character classification
and #$02 ; upper case char?
and #CT_UPPER ; upper case char?
beq L1 ; jump if no
txa ; get character back into accu
sec