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