4
struct s_chartype_info {
9
static struct s_chartype_info chartype_info_table[] = {
10
/* obtained by running mkbijfm.scm */
135
vf_tfm_builtin_jfm_chartype(long code_point)
140
n = sizeof(chartype_info_table) / sizeof(struct s_chartype_info);
142
if ((code_point < chartype_info_table[0].char_code)
143
|| (chartype_info_table[n-1].char_code < code_point))
150
if (chartype_info_table[m].char_code == code_point)
151
return chartype_info_table[m].char_type;
152
if (code_point < chartype_info_table[m].char_code)
162
int main(int argc, char **argv)
167
sscanf(argv[1], "%li", &d);
169
ct = vf_tfm_builtin_jfm_chartype(d);
170
printf("*** 0x%lx => %d\n", d, ct);