Use constants for the bits in the _ctype array.

git-svn-id: svn://svn.cc65.org/cc65/trunk@865 b7a2c559-68d2-44c3-8de9-860c34a00d81
2001-09-08 14:00:41 +00:00
parent d799cc283f
commit def6300556
13 changed files with 55 additions and 27 deletions
--- a/libsrc/common/ispunct.s
+++ b/libsrc/common/ispunct.s
@@ -5,15 +5,15 @@
 ;

 	.export		_ispunct
-	.import		__ctype
+       	.include	"ctype.inc"

 _ispunct:
 	cpx	#$00		; Char range ok?
 	bne	@L1		; Jump if no
 	tay
 	lda	__ctype,y	; Get character classification
-       	eor    	#$37   	       	; NOT (space | control | digit | char)
-       	and    	#$37		; Mask relevant bits
+       	eor    	#CT_NOT_PUNCT	; NOT (space | control | digit | alpha)
+       	and    	#CT_NOT_PUNCT	; Mask relevant bits
 	rts

@L1:	lda	#$00		; Return false