|
|
1.1 ! root 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: } ! 48:
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.