Return to 1.init.c CVS log

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

Annotation of 42BSD/usr.bin/struct/1.init.c, revision 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.