assure a consistent assignment for nodes with multiple labels

This commit is contained in:
Jeremy Hylton 1998-02-18 16:10:22 +00:00
parent b866020f66
commit 9caa110141
2 changed files with 4 additions and 2 deletions

View File

@ -4,7 +4,8 @@
require "labels.pl";
%nodes = ();
foreach $label (keys %external_labels) {
# sort so that we get a consistent assignment for nodes with multiple labels
foreach $label (sort keys %external_labels) {
$nodes{$external_labels{$label}} = $label;
}

View File

@ -4,7 +4,8 @@
require "labels.pl";
%nodes = ();
foreach $label (keys %external_labels) {
# sort so that we get a consistent assignment for nodes with multiple labels
foreach $label (sort keys %external_labels) {
$nodes{$external_labels{$label}} = $label;
}