Blame


1 a31db67d 2004-04-21 devnull #include <u.h>
2 a31db67d 2004-04-21 devnull #include <libc.h>
3 a31db67d 2004-04-21 devnull #include <bio.h>
4 a31db67d 2004-04-21 devnull #include <libg.h>
5 a31db67d 2004-04-21 devnull #include "hdr.h"
6 a31db67d 2004-04-21 devnull #include "../kuten208.h"
7 a31db67d 2004-04-21 devnull
8 a31db67d 2004-04-21 devnull /*
9 a31db67d 2004-04-21 devnull map: put kuten for runes from..to into chars
10 a31db67d 2004-04-21 devnull */
11 a31db67d 2004-04-21 devnull
12 a31db67d 2004-04-21 devnull void
13 a31db67d 2004-04-21 devnull kmap(int from, int to, long *chars)
14 a31db67d 2004-04-21 devnull {
15 a31db67d 2004-04-21 devnull long *l, *ll;
16 a31db67d 2004-04-21 devnull int k, k1, n;
17 a31db67d 2004-04-21 devnull
18 a31db67d 2004-04-21 devnull for(n = from; n <= to; n++)
19 a31db67d 2004-04-21 devnull chars[n-from] = 0;
20 a31db67d 2004-04-21 devnull for(l = tabkuten208, ll = tabkuten208+KUTEN208MAX; l < ll; l++)
21 a31db67d 2004-04-21 devnull if((*l >= from) && (*l <= to))
22 a31db67d 2004-04-21 devnull chars[*l-from] = l-tabkuten208;
23 a31db67d 2004-04-21 devnull k = 0;
24 a31db67d 2004-04-21 devnull k1 = 0; /* not necessary; just shuts ken up */
25 a31db67d 2004-04-21 devnull for(n = from; n <= to; n++)
26 a31db67d 2004-04-21 devnull if(chars[n-from] == 0){
27 a31db67d 2004-04-21 devnull k++;
28 a31db67d 2004-04-21 devnull k1 = n;
29 a31db67d 2004-04-21 devnull }
30 a31db67d 2004-04-21 devnull if(k){
31 a31db67d 2004-04-21 devnull fprint(2, "%s: %d/%d chars found (missing include 0x%x=%d)\n", argv0, (to-from+1-k), to-from+1, k1, k1);
32 a31db67d 2004-04-21 devnull /*exits("map problem");/**/
33 a31db67d 2004-04-21 devnull }
34 a31db67d 2004-04-21 devnull }