Changeset 306

Timestamp:

Oct 19, 2017, 6:50:32 PM (7 years ago)

Author:

g7moreau

Message:

• Add graph_shift=3 support

File:

• trunk/klask (modified) (3 diffs)

trunk/klask

@@ -7 +7 @@
 use strict;
 use warnings;
-use version; our $VERSION = qv('0.7.1');
+use version; our $VERSION = qv('0.7.2');
 
 use Readonly;
@@ -2987 +2987 @@
    print "\n";
 
+   # shift graph between 1 or 2 when $graph_shift = 3
+   my $graph_breaker = 1;
+
 #   print "Switch parent and children port inter-connection\n";
 #   print "------------------------------------------------\n";
@@ -3009 +3012 @@
                print  "   \"$invisible.a\" [shape=none, label=\"\"];\n";
                printf "   \"%s:%s\"  -> \"$invisible.a\" [style=invis];\n", $sw, $db_switch_output_port{$sw};
-               if ($graph_shift == 2) {
+               $graph_breaker++;
+               if ($graph_shift == 2 or ($graph_shift == 3 and ($graph_breaker % 2) == 0)) {
                   # Two invisible node
                   print  "   \"$invisible.b\" [shape=none, label=\"\"];\n";