1 2277c5d7 2004-03-21 devnull #include "std.h"
 2 2277c5d7 2004-03-21 devnull #include "dat.h"
 3 2277c5d7 2004-03-21 devnull 
 4 2277c5d7 2004-03-21 devnull Proto *prototab[] = {
 5 2277c5d7 2004-03-21 devnull 	&apop,
 6 2277c5d7 2004-03-21 devnull 	&cram,
 7 2277c5d7 2004-03-21 devnull 	&p9any,
 8 2277c5d7 2004-03-21 devnull 	&p9sk1,
 9 2277c5d7 2004-03-21 devnull 	&p9sk2,
10 2277c5d7 2004-03-21 devnull 	nil,
11 2277c5d7 2004-03-21 devnull };
12 2277c5d7 2004-03-21 devnull 
13 2277c5d7 2004-03-21 devnull Proto*
14 2277c5d7 2004-03-21 devnull protolookup(char *name)
15 2277c5d7 2004-03-21 devnull {
16 2277c5d7 2004-03-21 devnull 	int i;
17 2277c5d7 2004-03-21 devnull 
18 2277c5d7 2004-03-21 devnull 	for(i=0; prototab[i]; i++)
19 2277c5d7 2004-03-21 devnull 		if(strcmp(prototab[i]->name, name) == 0)
20 2277c5d7 2004-03-21 devnull 			return prototab[i];
21 2277c5d7 2004-03-21 devnull 	return nil;
22 2277c5d7 2004-03-21 devnull }