File: colour_cycle.g

package info (click to toggle)
xdeb 0.6.6
  • links: PTS
  • area: main
  • in suites: wheezy
  • size: 252 kB
  • sloc: python: 1,638; sh: 28; makefile: 22
file content (16 lines) | stat: -rw-r--r-- 378 bytes parent folder | download | duplicates (2)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
BEG_G {
  node_t n, n0;
  edge_t e, e0;
  graph_t g;
  int fd = openF ("scc.map", "r");
  while ((g = freadG (fd)) != NULL) {
    if (g.name != "cluster*") continue;
    for (n = fstnode(g); n; n = nxtnode(n)) {
      n0 = node ($, n.name);
      for (e = fstout(n); e; e = nxtout (e))
        e0 = isEdge (n0, node ($, e.head.name), "");
        e0.color = "red";
    }
  }
}