Blob


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