bex prun: More --debug

diff --git a/lib/bin/bex-prun b/lib/bin/bex-prun
index a6c14e814043783a048ed6513eebf519d3799a7f..ec573c1534f471b43596642bfcfe0c813996ed2a 100755 (executable)
--- a/lib/bin/bex-prun
+++ b/lib/bin/bex-prun
@@ -294,6 +294,8 @@ sub place_slot($) {
                print STDERR "I: Allocated ", $s->{'Host'}, " \@$besti (pri $pri)\n";
                $s->{'Row'} = $besti;
                $by_row[$besti] = $s;
+       } else {
+               print STDERR "I: No place for ", $s->{'Host'}, " (pri $pri)\n" if $debug;
        }
 }