Return to 1.init.c CVS log

Up to [CSRG BSD Unix] / 43BSDTahoe / usr.bin / struct

Annotation of 43BSDTahoe/usr.bin/struct/1.init.c, revision 1.1.1.1

1.1       root        1: #ifndef lint
                      2: static char sccsid[] = "@(#)1.init.c   4.1     (Berkeley)      2/11/83";
                      3: #endif not lint
                      4: 
                      5: #include <stdio.h>
                      6: #include "1.defs.h"
                      7: #include  "1.incl.h"
                      8: #include "def.h"
                      9: 
                     10: 
                     11: prog_init()
                     12:        {
                     13:        endline = endcom = 0;   endchar = -1;
                     14:        comchar = -1;
                     15:        graph = challoc(sizeof(*graph) * maxnode);
                     16:        }
                     17: 
                     18: routinit()
                     19:        {
                     20:        graf_init();
                     21:        progtype = !sub;
                     22:        routbeg = endline + 1;
                     23:        rtnbeg = endchar + 1;
                     24:        nameline = 0;
                     25:        stflag = UNDEFINED;
                     26:        }
                     27: line_init()
                     28:        {
                     29:        struct lablist *makelab();
                     30:        freelabs();
                     31:        newlab = linelabs = makelab(0L);
                     32:        flag = counter = nlabs = lswnum = swptr = p1 = 0;
                     33:        p3 = 5;
                     34:        endcom = endline;
                     35:        comchar = endchar;
                     36:        begline = endline + 1;  begchar = endchar + 1;
                     37:        reflab = endlab = errlab = 0;
                     38:        r1 = r2 = 0;
                     39:        }
                     40: graf_init()
                     41:        {
                     42:        int arctype[3];  long arclab[3];
                     43:        nodenum = 0;
                     44:        doptr = UNDEFINED;
                     45:        retvert = stopvert = UNDEFINED;
                     46:        ENTLST = FMTLST = 0;
                     47: 
                     48:        
                     49:        arctype[0] = -2;  arclab[0] = implicit;
                     50:        START = makenode(DUMVX,FALSE,FALSE,implicit,1,arctype,arclab);
                     51:        }
                     52: 

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.