2002-04-21 14:20:42 +00:00
|
|
|
;
|
|
|
|
|
; Definitions for the character type tables
|
|
|
|
|
;
|
|
|
|
|
; Ullrich von Bassewitz, 08.09.2001
|
|
|
|
|
;
|
|
|
|
|
|
|
|
|
|
; Make the __ctype table an exported/imported symbol
|
|
|
|
|
|
|
|
|
|
.global __ctype
|
|
|
|
|
|
|
|
|
|
; Define bitmapped constants for the table entries
|
|
|
|
|
|
2003-10-10 17:00:08 +00:00
|
|
|
CT_NONE = $00 ; Nothing special
|
2002-04-21 14:20:42 +00:00
|
|
|
CT_LOWER = $01 ; 0 - Lower case char
|
|
|
|
|
CT_UPPER = $02 ; 1 - Upper case char
|
|
|
|
|
CT_DIGIT = $04 ; 2 - Numeric digit
|
|
|
|
|
CT_XDIGIT = $08 ; 3 - Hex digit (both, lower and upper)
|
|
|
|
|
CT_CTRL = $10 ; 4 - Control character
|
|
|
|
|
CT_SPACE = $20 ; 5 - The space character itself
|
|
|
|
|
CT_OTHER_WS = $40 ; 6 - Other whitespace ('\f', '\n', '\r', '\t' and '\v')
|
|
|
|
|
CT_SPACE_TAB = $80 ; 7 - Space or tab character
|
|
|
|
|
|
|
|
|
|
; Combined stuff
|
|
|
|
|
CT_ALNUM = (CT_LOWER | CT_UPPER | CT_DIGIT)
|
|
|
|
|
CT_ALPHA = (CT_LOWER | CT_UPPER)
|
|
|
|
|
CT_CTRL_SPACE = (CT_CTRL | CT_SPACE)
|
|
|
|
|
CT_NOT_PUNCT = (CT_SPACE | CT_CTRL | CT_DIGIT | CT_UPPER | CT_LOWER)
|
|
|
|
|
|
|
|
|
|
|
