Commit | Line | Data |
---|---|---|
8b2e40fc BJ |
1 | #define MINT struct mint |
2 | MINT | |
3 | { int len; | |
4 | short *val; | |
5 | }; | |
6 | #define FREE(x) {if(x.len!=0) {free((char *)x.val); x.len=0;}} | |
7 | #ifndef DBG | |
8 | #define shfree(u) free((char *)u) | |
9 | #else | |
10 | #include "stdio.h" | |
11 | #define shfree(u) { if(dbg) fprintf(stderr, "free %o\n", u); free((char *)u);} | |
12 | extern int dbg; | |
13 | #endif | |
14 | #ifndef vax | |
15 | struct half | |
16 | { short high; | |
17 | short low; | |
18 | }; | |
19 | #else | |
20 | struct half | |
21 | { short low; | |
22 | short high; | |
23 | }; | |
24 | #endif | |
25 | extern MINT *itom(); | |
26 | extern short *xalloc(); | |
27 | ||
28 | #ifdef lint | |
29 | extern xv_oid; | |
30 | #define VOID xv_oid = | |
31 | #else | |
32 | #define VOID | |
33 | #endif |