1: /* -[Sat Jan 29 14:00:31 1983 by jkf]-
2: * structs.h $Locker: $
3: * random structure definitions
4: *
5: * $Header: /na/franz/franz/h/structs.h,v 1.1 83/01/29 14:07:48 jkf Exp $
6: *
7: * (c) copyright 1982, Regents of the University of California
8: */
9:
10: /*
11: * this file contains auxiliary structure definitions which are used by
12: * just a few files.
13: */
14:
15: /* transfer table structures. */
16:
17: #define TRENTS 510
18:
19: struct trent
20: {
21: lispval (*fcn)(); /* function to call */
22: lispval name; /* symbol which is the function to call */
23: };
24:
25: struct trtab
26: {
27: struct trtab *nxtt; /* pointer to next transfer table */
28: struct trent trentrs[TRENTS]; /* entries */
29: int sentinal; /* must be zero */
30: };
31:
32:
33:
34: struct heads {
35: struct heads *link;
36: char *pntr;
37: };
38:
39:
40: struct types
41: {
42: char *next_free;
43: int space_left,
44: space,
45: type,
46: type_len; /* note type_len is in units of int */
47: lispval *items,
48: *pages,
49: *type_name;
50: struct heads
51: *first;
52: char *next_pure_free;
53:
54: };
55:
56: struct str_x
57: {
58: char *next_free;
59: int space_left;
60: };
Defined struct's
heads
defined in line
34; used 4 times
str_x
defined in line
56;
never used
trent
defined in line
19; used 2 times
trtab
defined in line
25; used 2 times
types
defined in line
40;
never used
Defined macros