[OSSTEST PATCH 43/82] ts-hosts-allocate-Executive print sharing info in debug output

[Ian Jackson <iwj@xxxxxxxxxxxxxx>]

From: Ian Jackson <ian.jackson@xxxxxxxxxxxxx>

Signed-off-by: Ian Jackson <Ian.Jackson@xxxxxxxxxxxxx>
---
 ts-hosts-allocate-Executive | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/ts-hosts-allocate-Executive b/ts-hosts-allocate-Executive
index 58e9f891..fc107c08 100755
--- a/ts-hosts-allocate-Executive
+++ b/ts-hosts-allocate-Executive
@@ -691,7 +691,9 @@ sub hid_recurse ($$) {
     print DEBUG "$dbg FINAL start=$start_time va=$variation_age".
        " variation_bonus=$variation_bonus".
         " previously_failed=$previously_failed".
-       " previously_failed_equiv=$previously_failed_equiv cost=$cost\n";
+       " previously_failed_equiv=$previously_failed_equiv".
+       " eff.share_bonus=$share_reuse*$share_reuse_bonus".
+       " cost=$cost\n";
 
     if (!defined $best || $cost < $best->{Cost}) {
         print DEBUG "$dbg FINAL BEST: ".
-- 
2.20.1