1: /* Copyright (c) Stichting Mathematisch Centrum, Amsterdam, 1985. */
2:
3: /*
4: $Header: b1tlt.h,v 1.4 85/08/22 16:42:12 timo Exp $
5: */
6:
7: #ifndef INTEGRATION
8:
9: /* Private definitions for B texts, lists and tables */
10:
11: typedef struct telita {
12: HEADER; btreeptr root;
13: } a_telita, *telita;
14:
15: #define Itemtype(v) (((telita) (v))->len) /* Itemtype */
16: #define Root(v) (((telita) (v))->root)
17: #define Tltsize(v) (Root(v) EQ Bnil ? 0 : Size(Root(v)))
18:
19: #define Character(v) ((bool) (Type(v) EQ Tex && Tltsize(v) EQ 1))
20: value mkchar(); /* char c */
21:
22: #else INTEGRATION
23:
24: /************************************************************************/
25: /* Private definitions for small texts, lists and tables module */
26: /* A text is modelled as a sequence of len characters. */
27: /* */
28: /* A list is modelled as a sequence of len values, */
29: /* each of which corresponds to a list entry. */
30: /* */
31: /* A table is modelled as a sequence of len values, */
32: /* each of which corresponds to a table entry; */
33: /* table entries are modelled as a compound with two fields. */
34: /************************************************************************/
35:
36: #define Cts(v) (*Ats(v))
37: #define Dts(v) (*(Ats(v)+1))
38:
39: #define List_elem(l, i) (*(Ats(l)+i)) /*counts from 0; takes no copy*/
40: #define Key(t, i) (Ats(*(Ats(t)+i))) /*Ditto*/
41: #define Assoc(t, i) (Ats(*(Ats(t)+i))+1) /*Ditto*/
42:
43: bool found();
44: value list_elem();
45: value key_elem();
46:
47: #endif INTEGRATION
Defined struct's
Defined typedef's
Defined macros
Assoc
defined in line
41; used 4 times
Cts
defined in line
36; used 3 times
Dts
defined in line
37; used 10 times
Itemtype
defined in line
15; used 15 times
- in /usr/src/new/PORT/B/src/bint/b1lta.c line
212,
399-400(2),
417,
430,
451,
505,
673,
699,
726,
791-793(2),
857
- in /usr/src/new/PORT/B/src/bint/b1tlt.c line
171
- in /usr/src/new/PORT/B/src/bint/b1val.c line
322
Key
defined in line
40; used 2 times
Root
defined in line
16; used 49 times
- in line 17(2)
- in /usr/src/new/PORT/B/src/bint/b1lta.c line
214-219(2),
259,
411,
420,
436,
496(2),
507-508(2),
592(2),
615-617(2),
633-637(4),
690,
717,
790-793(3),
857
- in /usr/src/new/PORT/B/src/bint/b1obj.c line
76
- in /usr/src/new/PORT/B/src/bint/b1tex.c line
82,
138-140(2),
168,
285-287(2),
293-295(2),
301-304(3),
312,
336,
460(2)
- in /usr/src/new/PORT/B/src/bint/b1tlt.c line
28,
38,
88,
184-186(2),
192
- in /usr/src/new/PORT/B/src/bint/b1val.c line
322
Usage of this include