|
|
1.1 ! root 1: BEGIN {print ".GS"; print "draw nodes pointsize 30;"; print "separate ranks 6;"} ! 2: ! 3: { sub("[0-9]*",""); ! 4: for (i = 0; substr($0,i,1) == "\t"; i++); ! 5: i--; ! 6: inp = substr($0,i+1,length($0)); ! 7: sub(":.*","",inp); ! 8: if (i > 1) printf("%s %s ;\n",stack[i - 1],inp); ! 9: stack[i] = inp; ! 10: } ! 11: ! 12: END {print ".GE";}
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.