From 702e83c95ed75e6debbff8729177a8560f373956 Mon Sep 17 00:00:00 2001 From: Orestis Floros Date: Fri, 14 Sep 2018 14:04:54 +0300 Subject: [PATCH] dump-asy.pl: Include floating_nodes --- contrib/dump-asy.pl | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/contrib/dump-asy.pl b/contrib/dump-asy.pl index 2c244752..5af4c72f 100755 --- a/contrib/dump-asy.pl +++ b/contrib/dump-asy.pl @@ -46,7 +46,7 @@ sub dump_node { my $o = ($n->{orientation} eq 'none' ? "u" : ($n->{orientation} eq 'horizontal' ? "h" : "v")); 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; @@ -64,7 +64,8 @@ sub dump_node { print $tmp "n" . $parent->{id} . ", " if defined($parent); 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 { -- 2.39.2