6 #include "../kuten208.h"
9 map: put kuten for runes from..to into chars
13 kmap(int from, int to, long *chars)
18 for(n = from; n <= to; n++)
20 for(l = tabkuten208, ll = tabkuten208+KUTEN208MAX; l < ll; l++)
21 if((*l >= from) && (*l <= to))
22 chars[*l-from] = l-tabkuten208;
24 k1 = 0; /* not necessary; just shuts ken up */
25 for(n = from; n <= to; n++)
26 if(chars[n-from] == 0){
31 fprint(2, "%s: %d/%d chars found (missing include 0x%x=%d)\n", argv0, (to-from+1-k), to-from+1, k1, k1);
32 /*exits("map problem");/**/