Merge pull request #3401 from orestisf1993/dump-asy-floating

dump-asy.pl: Include floating_nodes
This commit is contained in:
Ingo Bürk 2018-09-14 13:29:07 +02:00 committed by GitHub
commit c7132ec5b0
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
1 changed files with 3 additions and 2 deletions

View File

@ -46,7 +46,7 @@ sub dump_node {
my $o = ($n->{orientation} eq 'none' ? "u" : ($n->{orientation} eq 'horizontal' ? "h" : "v")); my $o = ($n->{orientation} eq 'none' ? "u" : ($n->{orientation} eq 'horizontal' ? "h" : "v"));
my $w = (defined($n->{window}) ? $n->{window} : "N"); my $w = (defined($n->{window}) ? $n->{window} : "N");
my $na = ($n->{name} or "[Empty]"); my $na = ($n->{name} or ($n->{type} eq "floating_con" ? "[Floating con]" : "[Empty]"));
$na =~ s/#/\\#/g; $na =~ s/#/\\#/g;
$na =~ s/\$/\\\$/g; $na =~ s/\$/\\\$/g;
$na =~ s/&/\\&/g; $na =~ s/&/\\&/g;
@ -65,6 +65,7 @@ sub dump_node {
print $tmp "\"" . $name . "\");\n"; print $tmp "\"" . $name . "\");\n";
dump_node($_, $n) for @{$n->{nodes}}; dump_node($_, $n) for @{$n->{nodes}};
dump_node($_, $n) for @{$n->{floating_nodes}};
} }
sub find_node_with_name { sub find_node_with_name {