1 /*- 2 * %sccs.include.proprietary.c% 3 */ 4 5 #ifndef lint 6 static char sccsid[] = "@(#)4.main.c 8.1 (Berkeley) 06/06/93"; 7 #endif /* not lint */ 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 } 31