Commit | Line | Data |
---|---|---|
0fc6e47b KB |
1 | /*- |
2 | * %sccs.include.proprietary.c% | |
3 | */ | |
4 | ||
53fd2b8f | 5 | #ifndef lint |
0fc6e47b KB |
6 | static char sccsid[] = "@(#)4.main.c 4.2 (Berkeley) %G%"; |
7 | #endif /* not lint */ | |
53fd2b8f RH |
8 | |
9 | #include <stdio.h> | |
10 | #include "def.h" | |
11 | #include "4.def.h" | |
12 | ||
13 | LOGICAL *brace; | |
14 | output() | |
15 | { | |
16 | VERT w; | |
17 | int i; | |
18 | brace = challoc(nodenum * sizeof(*brace)); | |
19 | for (i = 0; i < nodenum; ++i) | |
20 | brace[i] = FALSE; | |
21 | if (progress) fprintf(stderr,"ndbrace:\n"); | |
22 | for (w = START; DEFINED(w); w = RSIB(w)) | |
23 | ndbrace(w); | |
24 | if (progress) fprintf(stderr,"outrat:\n"); | |
25 | for (w = START; DEFINED(w); w = RSIB(w)) | |
26 | outrat(w,0,YESTAB); | |
27 | OUTSTR("END\n"); | |
28 | chfree(brace,nodenum * sizeof(*brace)); | |
29 | brace = 0; | |
30 | } |