33   char *p = *p0;  in getunicode()  local
35   while (*p == ' ' || *p == '\t')  in getunicode()
36     p++;  in getunicode()
37   if (*p != 'U' || p[1] != '+' ||  in getunicode()
38       !isxdigit(p[2]) || !isxdigit(p[3]) || !isxdigit(p[4]) ||  in getunicode()
39       !isxdigit(p[5]) || isxdigit(p[6]))  in getunicode()
41   *p0 = p+6;  in getunicode()
42   return strtol(p+2,0,16);  in getunicode()
84   char *p, *p1;  in main()  local
116       if ( (p = strchr(buffer, '\n')) != NULL )  in main()
117 	*p = '\0';  in main()
121       p = buffer;  in main()
134       while (*p == ' ' || *p == '\t')  in main()
135 	p++;  in main()
136       if (!*p || *p == '#')  in main()
139       fp0 = strtol(p, &p1, 0);  in main()
140       if (p1 == p)  in main()
145       p = p1;  in main()
147       while (*p == ' ' || *p == '\t')  in main()
148 	p++;  in main()
149       if (*p == '-')  in main()
151 	  p++;  in main()
152 	  fp1 = strtol(p, &p1, 0);  in main()
153 	  if (p1 == p)  in main()
158 	  p = p1;  in main()
182 	  while (*p == ' ' || *p == '\t')  in main()
183 	    p++;  in main()
184 	  if (!strncmp(p, "idem", 4))  in main()
188 	      p += 4;  in main()
192 	      un0 = getunicode(&p);  in main()
193 	      while (*p == ' ' || *p == '\t')  in main()
194 		p++;  in main()
195 	      if (*p != '-')  in main()
202 	      p++;  in main()
203 	      un1 = getunicode(&p);  in main()
226 	    while ( (un0 = getunicode(&p)) >= 0 )  in main()
229       while (*p == ' ' || *p == '\t')  in main()
230 	p++;  in main()
231       if (*p && *p != '#')  in main()
232 	fprintf(stderr, "%s: trailing junk (%s) ignored\n", tblname, p);  in main()