git.sur5r.net Git - cc65/blob - libsrc/apple2/ctype.s

   1 ;
   2 ; Stefan Haubenthal with minor changes from Ullrich von Bassewitz, 2003-05-02
   3 ;
   4 ; Character specification table.
   5 ;
   6
   7         .include        "ctype.inc"
   8
   9 ; The tables are readonly, put them into the rodata segment
  10
  11 .rodata
  12
  13 ; The following 256 byte wide table specifies attributes for the isxxx type
  14 ; of functions. Doing it by a table means some overhead in space, but it
  15 ; has major advantages:
  16 ;
  17 ;   * It is fast. If it were'nt for the slow parameter passing of cc65, one
  18 ;     could even define macros for the isxxx functions (this is usually
  19 ;     done on other platforms).
  20 ;
  21 ;   * It is highly portable. The only unportable part is the table itself,
  22 ;     all real code goes into the common library.
  23 ;
  24 ;   * We save some code in the isxxx functions.
  25
  26 __ctype:
  27         .byte   CT_CTRL                 ;   0/00 ___ctrl_@___
  28         .byte   CT_CTRL                 ;   1/01 ___ctrl_A___
  29         .byte   CT_CTRL                 ;   2/02 ___ctrl_B___
  30         .byte   CT_CTRL                 ;   3/03 ___ctrl_C___
  31         .byte   CT_CTRL                 ;   4/04 ___ctrl_D___
  32         .byte   CT_CTRL                 ;   5/05 ___ctrl_E___
  33         .byte   CT_CTRL                 ;   6/06 ___ctrl_F___
  34         .byte   CT_CTRL                 ;   7/07 ___ctrl_G___
  35         .byte   CT_CTRL                 ;   8/08 ___ctrl_H___
  36         .byte   CT_CTRL | CT_OTHER_WS | CT_SPACE_TAB
  37                                         ;   9/09 ___ctrl_I___
  38         .byte   CT_CTRL | CT_OTHER_WS   ;  10/0a ___ctrl_J___
  39         .byte   CT_CTRL | CT_OTHER_WS   ;  11/0b ___ctrl_K___
  40         .byte   CT_CTRL | CT_OTHER_WS   ;  12/0c ___ctrl_L___
  41         .byte   CT_CTRL | CT_OTHER_WS   ;  13/0d ___ctrl_M___
  42         .byte   CT_CTRL                 ;  14/0e ___ctrl_N___
  43         .byte   CT_CTRL                 ;  15/0f ___ctrl_O___
  44         .byte   CT_CTRL                 ;  16/10 ___ctrl_P___
  45         .byte   CT_CTRL                 ;  17/11 ___ctrl_Q___
  46         .byte   CT_CTRL                 ;  18/12 ___ctrl_R___
  47         .byte   CT_CTRL                 ;  19/13 ___ctrl_S___
  48         .byte   CT_CTRL                 ;  20/14 ___ctrl_T___
  49         .byte   CT_CTRL                 ;  21/15 ___ctrl_U___
  50         .byte   CT_CTRL                 ;  22/16 ___ctrl_V___
  51         .byte   CT_CTRL                 ;  23/17 ___ctrl_W___
  52         .byte   CT_CTRL                 ;  24/18 ___ctrl_X___
  53         .byte   CT_CTRL                 ;  25/19 ___ctrl_Y___
  54         .byte   CT_CTRL                 ;  26/1a ___ctrl_Z___
  55         .byte   CT_CTRL                 ;  27/1b ___ctrl_[___
  56         .byte   CT_CTRL                 ;  28/1c ___ctrl_\___
  57         .byte   CT_CTRL                 ;  29/1d ___ctrl_]___
  58         .byte   CT_CTRL                 ;  30/1e ___ctrl_^___
  59         .byte   CT_CTRL                 ;  31/1f ___ctrl_____
  60         .byte   CT_SPACE | CT_SPACE_TAB ;  32/20 ___SPACE___
  61         .byte   $00                     ;  33/21 _____!_____
  62         .byte   $00                     ;  34/22 _____"_____
  63         .byte   $00                     ;  35/23 _____#_____
  64         .byte   $00                     ;  36/24 _____$_____
  65         .byte   $00                     ;  37/25 _____%_____
  66         .byte   $00                     ;  38/26 _____&_____
  67         .byte   $00                     ;  39/27 _____'_____
  68         .byte   $00                     ;  40/28 _____(_____
  69         .byte   $00                     ;  41/29 _____)_____
  70         .byte   $00                     ;  42/2a _____*_____
  71         .byte   $00                     ;  43/2b _____+_____
  72         .byte   $00                     ;  44/2c _____,_____
  73         .byte   $00                     ;  45/2d _____-_____
  74         .byte   $00                     ;  46/2e _____._____
  75         .byte   $00                     ;  47/2f _____/_____
  76         .byte   CT_DIGIT | CT_XDIGIT    ;  48/30 _____0_____
  77         .byte   CT_DIGIT | CT_XDIGIT    ;  49/31 _____1_____
  78         .byte   CT_DIGIT | CT_XDIGIT    ;  50/32 _____2_____
  79         .byte   CT_DIGIT | CT_XDIGIT    ;  51/33 _____3_____
  80         .byte   CT_DIGIT | CT_XDIGIT    ;  52/34 _____4_____
  81         .byte   CT_DIGIT | CT_XDIGIT    ;  53/35 _____5_____
  82         .byte   CT_DIGIT | CT_XDIGIT    ;  54/36 _____6_____
  83         .byte   CT_DIGIT | CT_XDIGIT    ;  55/37 _____7_____
  84         .byte   CT_DIGIT | CT_XDIGIT    ;  56/38 _____8_____
  85         .byte   CT_DIGIT | CT_XDIGIT    ;  57/39 _____9_____
  86         .byte   $00                     ;  58/3a _____:_____
  87         .byte   $00                     ;  59/3b _____;_____
  88         .byte   $00                     ;  60/3c _____<_____
  89         .byte   $00                     ;  61/3d _____=_____
  90         .byte   $00                     ;  62/3e _____>_____
  91         .byte   $00                     ;  63/3f _____?_____
  92
  93         .byte   $00                     ;  64/40 _____@_____
  94         .byte   CT_UPPER | CT_XDIGIT    ;  65/41 _____A_____
  95         .byte   CT_UPPER | CT_XDIGIT    ;  66/42 _____B_____
  96         .byte   CT_UPPER | CT_XDIGIT    ;  67/43 _____C_____
  97         .byte   CT_UPPER | CT_XDIGIT    ;  68/44 _____D_____
  98         .byte   CT_UPPER | CT_XDIGIT    ;  69/45 _____E_____
  99         .byte   CT_UPPER | CT_XDIGIT    ;  70/46 _____F_____
 100         .byte   CT_UPPER                ;  71/47 _____G_____
 101         .byte   CT_UPPER                ;  72/48 _____H_____
 102         .byte   CT_UPPER                ;  73/49 _____I_____
 103         .byte   CT_UPPER                ;  74/4a _____J_____
 104         .byte   CT_UPPER                ;  75/4b _____K_____
 105         .byte   CT_UPPER                ;  76/4c _____L_____
 106         .byte   CT_UPPER                ;  77/4d _____M_____
 107         .byte   CT_UPPER                ;  78/4e _____N_____
 108         .byte   CT_UPPER                ;  79/4f _____O_____
 109         .byte   CT_UPPER                ;  80/50 _____P_____
 110         .byte   CT_UPPER                ;  81/51 _____Q_____
 111         .byte   CT_UPPER                ;  82/52 _____R_____
 112         .byte   CT_UPPER                ;  83/53 _____S_____
 113         .byte   CT_UPPER                ;  84/54 _____T_____
 114         .byte   CT_UPPER                ;  85/55 _____U_____
 115         .byte   CT_UPPER                ;  86/56 _____V_____
 116         .byte   CT_UPPER                ;  87/57 _____W_____
 117         .byte   CT_UPPER                ;  88/58 _____X_____
 118         .byte   CT_UPPER                ;  89/59 _____Y_____
 119         .byte   CT_UPPER                ;  90/5a _____Z_____
 120         .byte   $00                     ;  91/5b _____[_____
 121         .byte   $00                     ;  92/5c _____\_____
 122         .byte   $00                     ;  93/5d _____]_____
 123         .byte   $00                     ;  94/5e _____^_____
 124         .byte   $00                     ;  95/5f _UNDERLINE_
 125         .byte   $00                     ;  96/60 ___grave___
 126         .byte   CT_LOWER | CT_XDIGIT    ;  97/61 _____a_____
 127         .byte   CT_LOWER | CT_XDIGIT    ;  98/62 _____b_____
 128         .byte   CT_LOWER | CT_XDIGIT    ;  99/63 _____c_____
 129         .byte   CT_LOWER | CT_XDIGIT    ; 100/64 _____d_____
 130         .byte   CT_LOWER | CT_XDIGIT    ; 101/65 _____e_____
 131         .byte   CT_LOWER | CT_XDIGIT    ; 102/66 _____f_____
 132         .byte   CT_LOWER                ; 103/67 _____g_____
 133         .byte   CT_LOWER                ; 104/68 _____h_____
 134         .byte   CT_LOWER                ; 105/69 _____i_____
 135         .byte   CT_LOWER                ; 106/6a _____j_____
 136         .byte   CT_LOWER                ; 107/6b _____k_____
 137         .byte   CT_LOWER                ; 108/6c _____l_____
 138         .byte   CT_LOWER                ; 109/6d _____m_____
 139         .byte   CT_LOWER                ; 110/6e _____n_____
 140         .byte   CT_LOWER                ; 111/6f _____o_____
 141         .byte   CT_LOWER                ; 112/70 _____p_____
 142         .byte   CT_LOWER                ; 113/71 _____q_____
 143         .byte   CT_LOWER                ; 114/72 _____r_____
 144         .byte   CT_LOWER                ; 115/73 _____s_____
 145         .byte   CT_LOWER                ; 116/74 _____t_____
 146         .byte   CT_LOWER                ; 117/75 _____u_____
 147         .byte   CT_LOWER                ; 118/76 _____v_____
 148         .byte   CT_LOWER                ; 119/77 _____w_____
 149         .byte   CT_LOWER                ; 120/78 _____x_____
 150         .byte   CT_LOWER                ; 121/79 _____y_____
 151         .byte   CT_LOWER                ; 122/7a _____z_____
 152         .byte   $00                     ; 123/7b _____{_____
 153         .byte   $00                     ; 124/7c _____|_____
 154         .byte   $00                     ; 125/7d _____}_____
 155         .byte   $00                     ; 126/7e _____~_____
 156         .byte   CT_OTHER_WS             ; 127/7f ____DEL____
 157
 158 ; The upper 128 characters are actually unused on the Apple, we wil encode
 159 ; them as "other printable"
 160
 161         .res    128, $00
 162
 163